Mõned käepärased isiklikud makrod: tagastage veeru number veeru numbri jaoks.

See on hea, kui soovite lahtrite (1,1) asemel kasutada selliseid avaldusi nagu vahemik ("A1").

Näiteks ColLetter (1) = A, ColLetter (2) = b,…, ColLetter (100) = CV jne.

3) ColLetter (veeru number) => tagastab veeru Letter.

Avalik funktsioon ColLetter (colNumber As Long) nagu string

Kui veergude arv <27 Siis
Kui colNumber = 0 Siis
ColLetter = "Z"
Muidu
ColLetter = Mid ("ABCDEFGHIJKLMNOPQRSTUVWXYZ", veerg, 1)
Lõpp Kui
Muidu
Kui colNumber <26 2 + 27 Siis
ColLetter = Keskmine ("ABCDEFGHIJKLMNOPQRSTUVWXYZ", FLOOR (veerg / 26), 1)
ColLetter = ColLetter & ColLetter (colNumber Mod 26)
Muidu
ColLetter = Mid ("ABCDEFGHIJKLMNOPQRSTUVWXYZ", FLOOR ((veerg - 26) / 676), 1)
ColLetter = ColLetter & ColLetter (colNumber - FLOOR ((colNumber - 26) / 676) * 676)
Lõpp Kui
Lõpp Kui

Lõppfunktsioon