Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
788to792
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
788to792
788to792
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ActiveCell.Column +Spalte

ActiveCell.Column +Spalte
09.08.2006 12:08:43
SteffenS
Hallo un guten Tag,
wie kann ich ActiveCell.Column nicht als Zahl sondern als Spalte z.B. E ausgeben.
Ich brauche auch nur die Spalte nicht die Zeile mit.
Danke
MFG
Steffen Schmerler

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ActiveCell.Column +Spalte
09.08.2006 12:21:03
Uduuh
Hallo,
Spalte=replace(mid(activecell.Address,2,instr(activecell.Address,"$")+1),"$","")
Gruß aus’m Pott
Udo

hier eine sub
09.08.2006 12:41:13
Mike
Hallo Steffen
ich habe dir hier ein kleines Beispielprogramm.Du kannst es auch relativ schnell als Funktion umändern.
Wolltest du so etwas?

Sub Spaltennummer_In_ABC()
Dim Quellspalte As Integer ' Spaltennummer der Zelle
Dim ABCName   As String    ' Name der Spalte
Dim rest        As Double
Quellspalte = ActiveCell.Column 'Spalten-Nr der aktuellenzelle
' Wert wandeln
rest = 0
ABCName = ""
If Quellspalte > 26 Then
rest = Int(Quellspalte / 26)
ABCName = Chr(rest + 64)
End If
Quellspalte = Quellspalte - rest * 26
ABCName = ABCName & Chr(Quellspalte + 64)
End Sub

Gruß
Mike René
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige