Zum Konvertieren von Excel Spaltennummern in alphabetischer Zeichen

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 833402 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Alles erweitern | Alles schließen

EINFÜHRUNG

Dieser Artikel beschreibt die im Microsoft Visual Basic für Applikationen (VBA)-Funktion in Microsoft Excel verwenden, um Spaltennummern in Ihre entsprechenden Buchstaben Kennzeichner für die gleiche Spalte zu konvertieren.

Beispielsweise wird die Nummer der Spalte 30 in der entsprechenden alphabetischen Zeichen "AD" konvertiert.

Weitere Informationen

Microsoft bietet Programmierbeispiele für Abbildung nur ohne Gewährleistung oder konkludent. Dies umfasst, ist jedoch nicht beschränkt auf konkludenten Garantien der Handelsüblichkeit oder Eignung für einen bestimmten Zweck. Dieser Artikel setzt voraus, dass Sie mit der Programmiersprache, die Programmierungsbeispiele ist und mit den Tools, die zum Erstellen und Debuggen von Prozeduren verwendet werden vertraut sind. Microsoft Support-Technikern helfen Erläuterung die Funktionalität einer bestimmten Prozedur, Sie werden ändert jedoch nicht diese Beispiele bieten Funktionen hinzugefügt oder Verfahren, um Ihren Anforderungen entsprechend zu erstellen.
Die Funktion ConvertToLetter funktioniert unter Verwendung des folgenden Algorithmus:
  1. Unterteilen Sie die Nummer der Spalte von 27 und legen Sie die resultierende ganze Zahl in die Variable "i".
  2. Subtrahieren Sie die Nummer der Spalte von "i" 26 multipliziert, und legen Sie dann das Ergebnis in die Variable "j".
  3. Die ganzzahligen Werte in Ihre entsprechenden alphabetischen Zeichen konvertieren, "i" und "j" werden Bereich von 0 bis 26 bzw..
Zum Beispiel: die Spalte-Anzahl ist 30.
  1. Die Spaltennummer ist geteilt durch 27: 30 / 27 = 1.1111 abgerundet, durch die Int -Funktion auf "1".
    i = 1
  2. Nächste Spaltennummer-(i * 26) = 30-(1 * 26) = 30 26 = 4.
    j = 4
  3. Die Werte separat in alphabetischer Zeichen konvertieren
    i = 1 = "A"
    j = 4 = "D"
  4. Miteinander kombiniert, Sie bilden das Spalte-Kennzeichner "AD".
Die folgende VBA-Funktion ist nur eine Möglichkeit Zahl Spaltenwerte in Ihre entsprechenden alphabetischen Zeichen zu konvertieren: iAlpha
Function ConvertToLetter(iCol As Integer) As String
   Dim iAlpha As Integer
   Dim iRemainder As Integer
   iAlpha = Int(iCol / 27)
   iRemainder = iCol - (iAlpha * 26)
   If iAlpha > 0 Then
      ConvertToLetter = Chr(iAlpha + 64)
   End If
   If iRemainder > 0 Then
      ConvertToLetter = ConvertToLetter & Chr(iRemainder + 64)
   End If
End Function
Hinweis: diese Funktion nur ganze Zahlen, die an Sie, in Ihre entsprechende alphanumerische Zeichen übergeben werden konvertiert. Es wird die Darstellung der Spalte oder die Zeilenüberschriften im physischen Arbeitsblatt nicht geändert.

Eigenschaften

Artikel-ID: 833402 - Geändert am: Montag, 13. November 2006 - Version: 4.2
Die Informationen in diesem Artikel beziehen sich auf:
  • Microsoft Office Excel 2007
  • Microsoft Office Excel 2003
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
Keywords: 
kbmt kbcodesnippet kbcode kbhowto KB833402 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 833402
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.

Ihr Feedback an uns