PDA

View Full Version : Linking Excel Cell with Text Box



rahul_r79
08-25-2010, 08:24 PM
Hi All

I am trying to link multiple excel cell value to one Excel Text Box,but its not working only b4 value is coming in the textbox,..Is there is any way I put multiple excel cell value in one Textbox??:banghead:
[VBA]
Public Sub TextBox()
ActiveSheet.Shapes("Text Box 3").Select[VBA]
Selection.Characters.Text = Range("B3").Value
Selection.Characters.Text = Range("B4").Value
Range("B1").Select
End Sub
[\VBA]

Ken Puls
08-25-2010, 11:40 PM
Untested, but try this:

Public Sub TextBox()
ActiveSheet.Shapes("Text Box 3").Characters.Text = Range("B3").Value & Range("B4").Value
End Sub

Bob Phillips
08-26-2010, 12:24 AM
If its a drawing control, use



ActiveSheet.Shapes("TextBox 3").TextFrame.Characters.Text = Range("B3").Value & Range("B4").Value

rahul_r79
08-26-2010, 03:22 PM
Thanks A million for the reply

But its giving an "Run Error 438 " Object doesn't support this property or method

Is I am doing something very wrong.???

Ken Puls
08-26-2010, 03:25 PM
Which example? Bob's (xld) or mine? They are different, so you should try both...

rahul_r79
08-26-2010, 03:43 PM
Yep I got it

The name of the Box was not right...:bow:

Thanks a lot