Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
604to608
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
604to608
604to608
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Spaltenbuchstaben

Spaltenbuchstaben
02.05.2005 11:18:27
Oli
Moin,
gibt es eine Excelfunktion, die mir aus einem Index den Spaltenbuchstaben ermittelt? Mit der Zeichen() Funktion kann man zwar einen Buchstaben ermitteln, aber wenn der Index größer als 26 wird, besteht die Spaltendeklaration aus zwei Buchstaben.
Was ich bräuchte ist ein Befehl, der z.B. sowas rausgibt:
Index=27
Spaltenbuchstaben(Index)=AA
Oli

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltenbuchstaben
02.05.2005 11:29:42
UweD
Hallo Oli
folgene Benutzerdefinierte Funktion macht das:

Function SpalteToAlpha(spalte As Integer)
Dim Q%, M%
If spalte = 0 Then SpalteToAlpha = "": Exit Function
Q = Int(spalte / 26): M = spalte Mod 26
If M = 0 Then Q = Q - 1: M = 26
If Q > 0 Then SpalteToAlpha = Chr(Q + 64) & Chr(M + 64) _
Else: SpalteToAlpha = Chr(M + 64)
End Function

(wird in ein Modul in der Datei geschrieben)
sieht dann so aus:
 
 ABC
1Index427
2SpalteDAA
Formeln der Tabelle
B2 : =SpalteToAlpha(B1)
C2 : =SpalteToAlpha(C1)
 

Gruß Uwe
Anzeige
AW: Spaltenbuchstaben
02.05.2005 11:32:33
Oli
Danke Uwe.
Aber ein Makro bzw. eine Funktion in VBA habe ich bereits. Ich suche eine Excel Funktion, damit ich mit dem Indirekt Befehl arbeiten kann.
Oli
AW: Spaltenbuchstaben
02.05.2005 11:56:08
UweD
Hallo nochmal
lt. www.excelformeln.de geht es auch so:
 
 AB
1Index27
2SpalteAA
Formeln der Tabelle
B2 : =WECHSELN(ADRESSE(1;B1;4);1;)
 

Gruß UweD
Anzeige
AW: Spaltenbuchstaben
02.05.2005 11:37:17
Galenzo
als Funktion so:
=WECHSELN(LINKS(ZELLE("adresse");3);"$";"")
Viel Erfolg!
AW: Spaltenbuchstaben
02.05.2005 11:30:10
Galenzo
vielleicht so?
MsgBox WorksheetFunction.Substitute(Left(Cells(1, 27).EntireColumn.Address(0, 0), 2), ":", "")
Viel Erfolg!
Tabellenfunktionen:
02.05.2005 11:48:40
ingoG
Hallo Oli,
in c1 steht zb 27
dann gibt folgende Formel AA zurück...
=TEIL(ZELLE("Adresse";BEREICH.VERSCHIEBEN($A$1;0;c1-1));2;LÄNGE(ZELLE("Adresse";BEREICH.VERSCHIEBEN($A$1;0;c1-1)))-3)
Gruß Ingo
AW: Spaltenbuchstaben
02.05.2005 11:59:23
Uwe
Hallo Oli,
wofür INDIREKT()?
Nimm doch gleich INDEX().
 
 ABC
1   
2Hallo Oli Oli
3   
43  
Formeln der Tabelle
A2 : ="Hallo "&INDEX(1:65536;2;A4)
 

Gruß Uwe
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige