Code samenvatten in 1 regel?

[jansm]

Beste mensen,
is onderstaande code simpeler te schrijven, bijvoorbeeld in 1 regel?

Columns(8).Replace "%", ""
Columns(8).Replace ",", "."
Columns(8).NumberFormat = "$ #,##0.00"

Mvg, Jansm

 

[Joske2000]

With Columns(8)
    .Replace "%", ""
    .Replace ",", "."
    .NumberFormat = "$ #,##0.00"
End With

Maakt het voor mijn part wat meer leesbaar.

Gr,

Joske

 

[jansm]

bedankt.

 

[OctaFish]

Je wilt code van 3 regels terugbrengen naar één regel (dat kan overigens) en je bent blij met en oplossing die twee regels langer is... Ben benieuwd of je nog antwoord wilt op je vraag

 

[SjonR]

maak het niet zo spannend Octa , laat maar zien...

 

[jansm]

Octa, hou me aanbevolen!! Eén regel? Als je h'm nog weet dan wil ik h'm graag zien

 

[Cobbe]

Ene voor te lachen, maar wel op één regel:

With Columns(8): .Replace "%", "": .Replace ",", ".": .NumberFormat = "$ #,##0.00": End With

 

[jansm]

lach me rot!!!
Nee hoor, dubbele punt als scheidingsteken. Weer wat geleerd.
Nog iemand waar we NIET om hoeven te lachen? HSV, Snb, VenA of andere? We, of alleen ik, le(e)r(en) er altijd van.