Input uit inputbox gebruiken

[boesjwoelie]

Hallo allemaal,

Ik heb een heel klein macrotje, dat ik niet aan de praat krijg. het is de bedoeling dat je met een inputbox een cel selecteerd, en dat de waarde van die cel dan gekopieerd word naar een andere cel.
nu ziet het er zo uit:

Sub test2()
Set MyCell = Application.InputBox(prompt:="kies cel", Type:=8)
Range MyCell.Select
Selection.Copy
Range("i4").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

maar dat werkt dus niet, ik krijg een foutmelding. Iemand die weet hoe dit op te lossen is?

alvast bedankt ^^

 

[ExcelAmateur]

boesjwoelie,

Probeer dit eens.

Sub test2()
Set MyCell = Application.InputBox(prompt:="kies cel", Type:=8)
 MyCell.Copy Range("i4")
Application.CutCopyMode = False
End

Sub

 

[boesjwoelie]

Bedankt, werkt als een trein =D