enter data to specific cell

[Sheila]

can someone help me with my little problem.

I wish a small macro to enter data into a specific cell by asking me
for data

I want to enter data into 4 different cells by clicking a button and a
pop up asking me what info I require. will assume cells to have data
entered are a1, a2, a3 and a4

hope someone can help.

TIA
sheila

 

[Dan E]

Sheila,
Something like this might work

Private Sub CommandButton1_Click()
myInput = InputBox("Enter your Value")
Range("A1:A4").Value = myInput
End Sub

Puts the same value in A1:A4

Range("A1").Value = myInput
Puts the value in just A1

Dan E

 

[Sheila]

WOW!!!!

thanks Dan and so quick too, appreciate it

Sheila