excelmakro: Omdanne kolonnenr. til kolonnebogstav

Eksempel:

Sub test()
    kol = Split(ActiveCell.Address, "$")
    c = kol(1)
End Sub

Jeg er ikke helt med på hvordan makroen virker. Kan du give mig et eksempel på input og output?

Måske jeg ikke har fået forklaret problemet grundigt nok.

Min sum skal gå fra række 2 til række 7 i søjle 3 (C).

Er det som en "Sum-funktion"?

Ved at anvende .Address - bliver følgende returneret: $C$7

Splitfunktionen "opdeler" adressen med $ som separator - ved at anvende index 1 returneres C

Det er en del af en lidt større funktion/makro Hvor der indsættes en  kolonne, der skal summeres over. Summen skal være for x-antal overstående rækker, der løbende bliver ændret. Skal derfor være en =SUM( start_cell : slut_celle )

Har lavet et lille forsøg for at se om  jeg har forstået princippet med .Address korrekt:

sum_r (tallet på den række summen skal være i)
sum_k (tallet på den søjle der skal summeres over)

' Vælger den celle summen skal være i
Cells(sum_r, sum_k).Select

kol = Split(ActiveCell.Address, "$")
ActiveCell.Formula = kol

- der kommer desværre ikke noget tal ud af det.

Vender tilbage senere..

Fik det til at virke med lidt forskellige forsøg, smid et svar.

Løsningen blev:

x = Range(Cells(start_raekke, kol), Cells(sum_raekke - 1, kol)).Address
ActiveCell.Formula = "=SUM(" & x & ")"

Godt det lykkedes - du får et svar..