Unable To Return To Normal Texct From Italic

[Ark68]

I was successfull in italicizing text in my textbox, but I am struggling with turning the italic format off to return the text to normal.

                With uf9_poststaff
                    .pin.Enabled = True
                    .dcard_id.Enabled = True
                    .dcard_no.Enabled = True
                    .dcard_id.Font.Italic = False
                    .dcard_id.ForeColor = RGB(0, 0, 0)
                    .dcard_no.Font.Italic = False
                    .dcard_no.ForeColor = RGB(0, 0, 0)
                    .pin.Font.Italic = False
                    .pin.Font.ForeColor = RGB(0, 0, 0)
                    mbevents = True
                
                    .vm_emplschedule.Enabled = True
                    .v_employeepp.Enabled = True
                End With

Is anyone able to reveal what I'm doing wrong?

 

[DanteAmor]

This instruction does not change to normal?

[COLOR=#0000ff].dcard_id.Font.Italic = False[/COLOR]

Does it send you an error?

 

[Ark68]

Hi Dante,

No, it doesn't for some reason, which is why I posted. No errors thown either. It seems pretty simple which is why I am at odds as to why it isn't working. All other properties I change for these textboxes get applied, just not the italic.

 

[James006]

Hello,

Just create a test file, a simple userform with a TextBox ...

And test again your exact code ...

It will allow to determine if your Excel version has a problem ... or not ...

Hope this will help

 

[DanteAmor]

And if you play a little with the letter styles.
eg.

        'italic on
        Me.dcard_id.Font.Name = "Monotype Corsiva"
        '
        'italic off
        Me.dcard_id.Font.Name = "Tahoma"

 

[Ark68]

Just create a test file, a simple userform with a TextBox ...

The problem was not recreated in the test file. I was able to toggle between italic and non italic in the textbox without issue.

And if you play a little with the letter styles.

In my code, after the set the .font.italic = false, I added the line .font.name = "Monotype Corsiva".
The textbox remained in italics, but the font changed.

 

[DanteAmor]

The problem is the font style

This does not work

Turn on:

        Me.dcard_id.Font.Name = "Monotype Corsiva"
        Me.dcard_id.Font.Italic = True

Turn off:

        Me.dcard_id.Font.Name = "Monotype Corsiva"
        Me.dcard_id.Font.Italic = False

---

This works:
Turn on:

        Me.dcard_id.Font.Name = "Tahoma"
        Me.dcard_id.Font.Italic = True

Turn off:

        Me.dcard_id.Font.Name = "Tahoma"
        Me.dcard_id.Font.Italic = False

---

Then use another font style

 

[luizmoraes]

This worked for me:

Instead of Me.TextBox19.Font.Italic = False, the Me.TextBox19.FontItalic = False code worked fine. Just remove the dot between Font and Italic.

Hope to help