Debug hjælp!

Target er et reseveret ord, bruges om aktiv celle, så derfor er der ikke flere kolonne i den.
Brug

antal = Selection.Columns.Count, hvor det er det markerede område.
h
vad mener du med

Range("B").Columns.Count,
er det et navngiven område , hvis du mener kolonne B, skal den se sådan ud.

Range("B:B").Columns.Count
Men det giver ingen mening da det altid er 1 kolonne.

Jamen tak for det hurtige svar.
Jeg ville have at Range("B").Columns.Count skulle være lig 2, men det er måske bare mig?
Jeg bruger
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

derfor taget. Jeg skal desværre hjem nu, men håber der er hjælp i morgen tidlig. Det er sku lækkert med ekspert hjælp. Fedt.