Format cell

[Guest]

Hello,

I am pulling two different fields from an Access database and putting them
into one cell in Excel. This works fine. What I need to know is to BOLD and
UNDERLINE the first field in the cell but not the second field. Can this be
done?

The variable names are:
var_ID
Var_Name

 

[Guest]

turn on the macro recorder and do it manually.

Turn off the macro recorder and look at the code.

 

[Guest]

Tom,

I turned the Macro Recorder on. When I BOLD the item manually, I get a
message that says, "Unable to record". What is going on?

 

[Guest]

I don't know. I did it manually and recorded:
ActiveCell.FormulaR1C1 = "abcd-efgh"
Range("F3").Select
ActiveCell.FormulaR1C1 = "abcd-efgh"
With ActiveCell.Characters(Start:=1, Length:=4).Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleSingle
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=5, Length:=5).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Range("G3").Select

Which could be culled down to

Sub mySub()
With ActiveCell
.FormulaR1C1 = "abcd-efgh"
With .Characters(Start:=1, Length:=4).Font
.Bold = True
.Underline = True
End With
End With
End Sub

 

[Stopher]

Only problem with that is is assumes that the var_ID is always 4
characters long. If this is the case hen there wont be a problem.

How are you importing the values from Access and how are you combining
them?

 

[Tom Ogilvy]

Glad your back, everyone is waiting to see your solution:

" a user interface thing where you ask the person to check for duplicates,
if they hit yes it
pauses the code and resumes on enter?"