Dante Amor respondió:
Utiliza lo siguiente. Si en la celda G10 tienes "metropolitan[12]", al ejecutar la macro "llamada", te enviará un mensaje con el texto: [12] Sub llamada() Dim resultado As String resultado = ExtraerDato(Range("G10").Value) MsgBox resultado End Sub...