Determin Cell Contents (Text) using VBA

  • Thread starter Thread starter Jeff Smith
  • Start date Start date
J

Jeff Smith

Hi,

Is there a way I can display the permanent cell content by entering this
information in VBA.

If so, where do I place the code? In the Worksheet or a module?

What I am trying to achieve (and what I have been fiddling with is something
like)

CellContents.Sheets."[Main!""A1"="CompanyName"]
CellContents.Sheets."[Main!""A2"="Address1"] etc.

Can anyone put me right on how to do this pleae?

TIA

Jeff Smith
 
Hi Jeff

In a general module....

Sub PlaceText()
ThisWorkbook.Sheets("Main").Range("A1")="CompanyName"
ThisWorkbook.Sheets("Main").Range("A1")="Address1"
End Sub

--
XL2002
Regards

William

(e-mail address removed)

| Hi,
|
| Is there a way I can display the permanent cell content by entering this
| information in VBA.
|
| If so, where do I place the code? In the Worksheet or a module?
|
| What I am trying to achieve (and what I have been fiddling with is
something
| like)
|
| CellContents.Sheets."[Main!""A1"="CompanyName"]
| CellContents.Sheets."[Main!""A2"="Address1"] etc.
|
| Can anyone put me right on how to do this pleae?
|
| TIA
|
| Jeff Smith
|
|
 
Sorry

Sub should have read as follows (original post had referenced range A1
twice).

Sub PlaceText()
ThisWorkbook.Sheets("Main").Range("A1")="CompanyName"
ThisWorkbook.Sheets("Main").Range("A2")="Address1"
End Sub


--
XL2002
Regards

William

(e-mail address removed)

| Hi Jeff
|
| In a general module....
|
| Sub PlaceText()
| ThisWorkbook.Sheets("Main").Range("A1")="CompanyName"
| ThisWorkbook.Sheets("Main").Range("A1")="Address1"
| End Sub
|
| --
| XL2002
| Regards
|
| William
|
| (e-mail address removed)
|
| | | Hi,
| |
| | Is there a way I can display the permanent cell content by entering this
| | information in VBA.
| |
| | If so, where do I place the code? In the Worksheet or a module?
| |
| | What I am trying to achieve (and what I have been fiddling with is
| something
| | like)
| |
| | CellContents.Sheets."[Main!""A1"="CompanyName"]
| | CellContents.Sheets."[Main!""A2"="Address1"] etc.
| |
| | Can anyone put me right on how to do this pleae?
| |
| | TIA
| |
| | Jeff Smith
| |
| |
|
|
 
Back
Top