Dim strText as String

strText = ActiveSheet.Range("A1")
ActiveSheet.Range("A2") = InputBox(strText,"Title",strText)
or
MsgBox(strText,vbInformation,"Title")

U¿ytkownik "David W" napisa³ w wiadomo¶ci
...
I know that you can display text for people to read
and I know you can display a cells content in the same place, but how do
you
do both