Daži ērti personiskie makro: atgrieziet slejas burtu kolonnas numuram.

Anonim

Tas ir labi, ja šūnu (1,1) vietā vēlaties izmantot tādus paziņojumus kā diapazons ("A1").

Tā, piemēram, ColLetter (1) = A, ColLetter (2) = b,…, ColLetter (100) = CV utt.

3) ColLetter (kolonnas numurs) => nodod atpakaļ kolonnu Letter.

Publiskās funkcijas ColLetter (kolonnas numurs tik ilgi) kā virkne

Ja kolu skaits <27 Tad
Ja kolonnas numurs = 0 Tad
ColLetter = "Z"
Citādi
ColLetter = Mid ("ABCDEFGHIJKLMNOPQRSTUVWXYZ", kolonnas numurs, 1)
Beigas Ja
Citādi
Ja kolonnas numurs <26 2 + 27 Tad
ColLetter = Mid ("ABCDEFGHIJKLMNOPQRSTUVWXYZ", FLOOR (kolonnas numurs / 26), 1)
ColLetter = ColLetter & ColLetter (colNumber Mod 26)
Citādi
ColLetter = Mid ("ABCDEFGHIJKLMNOPQRSTUVWXYZ", FLOOR ((kolonnas numurs - 26) / 676), 1)
ColLetter = ColLetter & ColLetter (colNumber - FLOOR ((kolonnas numurs - 26) / 676) * 676)
Beigas Ja
Beigas Ja

Beigu funkcija