Projekt-Anfragen: Tel: 07022/9319004 info@CodeDocu.de Software Entwicklung in C# WPF Asp.Net Core Vba Excel Word SQL-Server EF Linq, UWP Net
#

Download:

Datei 1: Demo_Convert_Letter_to_Ascii.xlsm

Excel: Wandle Buchstaben in Ascii Zahlen um

 

Hier findet man einen Code, mit welchem man in Excel Buchstaben in Zahlen umwandlen kann.

Im Beispiel wird A zu 1 , B->2, C->3….

 

Der vba Code ist zum Kopieren und eine Beispiel Datei im Anhang

 

Nach dem Lauf

 

Im vba Editor das Modul 1

 

Der vba Code zum Test

Option Explicit



Public Function Convert_Letter_To_Value(ByRef range_To_Convert As Range)

    '--------< Convert_Letter_To_Value() >------------

    '*Korrekturen : Tausche Buchstaben aus

    

    Dim intOffset_StartBuchstabe As Integer

    intOffset_StartBuchstabe = Asc("A")

    

    '----< @Loop: Alle Rows >----

    Dim cell As Range

    For Each cell In range_To_Convert.Cells

        Dim sValue As String

        sValue = cell.Value2

        

        '-< Korrektur Zeichen >-

        '*Wandle das erste Zeichen in Buchstaben um

        If Len(sValue) > 0 Then

            Dim sBuchstabe As String

            sBuchstabe = Mid$(sValue11)

            

            Dim ascii_Value_Buchstabe As Integer

            ascii_Value_Buchstabe = Asc(sBuchstabe)

            

            Dim intNeu As Integer

            intNeu = ascii_Value_Buchstabe - intOffset_StartBuchstabe + 1

            

            Dim sZahlenwert As String

            sZahlenwert = CStr(intNeu)

            '< austauschen >

            sValue = sZahlenwert & Mid$(sValue2)

            '</ austauschen >

        End If

        '-</ Korrektur Zeichen >-

        

        '< schreiben in Excel Zelle >

        cell.Value2 = sValue

        '</ schreiben in Excel Zelle >

    Next

    '----</ @Loop: Alle Rows >----

    

    '--------</ Convert_Letter_To_Value() >------------

End Function

 

 

 

Mobile
»
Excel: Wandle Buchstaben in Ascii Zahlen um
»
Excel: Wandle Buchstaben in Ascii Zahlen um
»
Excel Speichern als .CSV mit Semikolon zeichen
»
Vba Makro Code: So erstellt man ein Excel Workbook und Sheet zur Laufzeit ohne Excel Verweis
»
Office Verzeichnis Dialog ohne Verweis auf ObjectLibrary
»
Ändern von vba Code zu Late Binding ohne dll-Verweis Dim Excel Word as Object
»
Excel Datei mit Schutz mit erlaubtem Farbformatierungen, Kommentaren und Sperren von Formelfeldern
»
Excel vba Fehler: Laufzeitfehler 1004 Die Locked-Eigenschaft des Range-Objektes kann nicht festgelegt werden
»
Excel Datei schützen
»
Excel Blatt schützen: Protect Parameter

.

Jobs, Projekte, Angebote für Freiberufler, Selbstständig an Info@CodeDocu.de