Print Value from Inputbox
 

Hi All,

I have written a code to paste the Value from Input box, however am facing the problem, I want VBA to paste until there is a value in Col "C" Could you please help.



Option Explicit

Sub test()
Dim Eingabe As String
Dim Rw As Long

Rw = Cells(Rows.Count, 1).End(xlUp).Row
Do Until Not IsEmpty(Cells(Rw, 3).End(xlUp))
Eingabe = InputBox("Enter a number")
Cells(Rw, 1).Value = Eingabe
Rw = Rw + 1
Loop
End Sub

Please find the attached file