Enrique Bernal respondió:
SI te sirve con un input esto te podría ayudar. Range("A1:A5").Select Selection. Copy A = InputBox("Indicar la celda en la que se va a pegar la info") Range(a).Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False,...