fredlo2010
05-24-2012, 09:26 PM
Hello,
I am trying to make the text in an specific cell bold. The text is inside a table and for some reason every time I use a macro that copies from another sheet and pastes values here, conditional formation stops working. Actually the range that i set it to cover first splits in two to exclude the table.
The words I want bold are " Systems", "Cookies", "Items"
I am a total newbie to VBA I am trying to learn as I go, I tried to create a code but it gives me an error.
Here is the code I have
Sub AddSystems(varColumns As String)
Call ClearContents
Sheets("Appendix Data").Range("A6:A406").Value = Sheets("Systems").Range(varColumns & 2, varColumns & 402).Value
With Sheets("Appendix Data").Range("A1:A1000")
.Find.Value = "Systems"
.Font.Bold = True
End With
End Sub
thanks for the help
I am trying to make the text in an specific cell bold. The text is inside a table and for some reason every time I use a macro that copies from another sheet and pastes values here, conditional formation stops working. Actually the range that i set it to cover first splits in two to exclude the table.
The words I want bold are " Systems", "Cookies", "Items"
I am a total newbie to VBA I am trying to learn as I go, I tried to create a code but it gives me an error.
Here is the code I have
Sub AddSystems(varColumns As String)
Call ClearContents
Sheets("Appendix Data").Range("A6:A406").Value = Sheets("Systems").Range(varColumns & 2, varColumns & 402).Value
With Sheets("Appendix Data").Range("A1:A1000")
.Find.Value = "Systems"
.Font.Bold = True
End With
End Sub
thanks for the help