Join fachinformatiker.de Forum Now
Ergebnis 1 bis 5 von 5

VBA Zellen-String Länge bestimmen

Diskussion über VBA Zellen-String Länge bestimmen in Basic der Kategorie Programmierung; Wie kann ich mit nem Makro die Länge eines Strings bestimmen der in einer bestimmten Zelle einer Tabelle steht (Excel ...

  1. #1
    Reg.-Benutzer
    Reg.-Datum
    10.08.2005
    Beiträge
    349

    Standard VBA Zellen-String Länge bestimmen

    Wie kann ich mit nem Makro die Länge eines Strings bestimmen der in einer bestimmten Zelle einer Tabelle steht (Excel 2003)???

    Dim lg As Integer
    Dim i As Integer

    Sub lange()
    i = 1

    Do Until Sheets("Konzerne").Range("a" & i) = ""

    Sheets("Konzerne").Range("x" & i) = Len(Sheets("Konzerne").Range("c" + i)) '+ Len(Sheets("Konzerne").Range("d" + i))
    i = i + 1
    Loop


    End Sub

    Kommt ne Fehlermeldung.......

    Der Bär verspürt an manchen Tagen ein rätzelhaftes Unbehagen!

  2. #2
    Gesperrt Avatar von |roTekuGeL|
    Reg.-Datum
    16.12.2002
    Ort
    KA
    Beiträge
    1.161

    Standard

    wie länge bestimmen? bestimmen im sinne von festlegen oder bestimmen im sinne von herausbekommen

  3. #3
    Administrator + Moderator
    C++: Compiler, IDEs, APIs / C und C++, Algorithmik, Basic, Sonstige, .NET
    Avatar von Klotzkopp
    Reg.-Datum
    10.07.2001
    Ort
    Essen
    Beiträge
    9.834

    Standard

    Zitat Zitat von McSaesch
    Kommt ne Fehlermeldung.......
    Das klingt wie der Anfang eines schlechten Witzes.

    Fehlermeldungen dienen nicht dazu dich zu ärgern, sondern dir Hinweise auf die Fehlerursache zu geben. Wenn wir dir dabei helfen sollen, ist es immer von Vorteil, wenn du die Fehlermeldung dazuschreibst.

    *gebetsmühlewegpack*
    "Funktioniert nicht" ist keine ausreichende Problembeschreibung.

  4. #4
    Gesperrt Avatar von |roTekuGeL|
    Reg.-Datum
    16.12.2002
    Ort
    KA
    Beiträge
    1.161

    Standard

    ich versuchs mal:

    i = 1
    das = Len(Tabelle1.Cells(i, 1)) - 1
    Tabelle1.Cells(i, 1) = Left(Tabelle1.Cells(i, 1), das)

    schneidet 1 zeichen der zelle A1 ab... also bestimmt man damit die länge in 2erlei hinsicht

  5. #5
    Reg.-Benutzer Avatar von gordonski
    Reg.-Datum
    02.01.2006
    Ort
    DN
    Beiträge
    67

    Beitrag

    Dim lg As Integer
    Dim i As Integer

    Sub lange()
    i = 1
    Sheets("Konzerne").Activate
    Do Until Range("a" & i) = ""

    Range("x" & i).Value = Len(Range("c" & i).Value) + Len(Range("d" & i).Value)
    i = i + 1

    Loop

    End Sub

    Das läuft und addiert die String-Längen der Zellen ci und di und gibt das ergebnis in xi aus solange in ai irgendwas steht. Ist es das was du wolltest?

    Gordonski
    Ich weiß nicht was ich denke, bevor ich höre was ich sage.

Aktive Benutzer

Aktive Benutzer

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)

Ähnliche Themen

  1. Maximale Länge bei der Ausgabe von String bestimmen (PHP)
    Von dreadlord im Forum Skript- und Webserverprogrammierung
    Antworten: 6
    Letzter Beitrag: 17.05.2004, 17:27
  2. Wochenende in PHP bestimmen...
    Von Himon.de im Forum Skript- und Webserverprogrammierung
    Antworten: 3
    Letzter Beitrag: 12.01.2004, 15:30
  3. Wer darf bestimmen?
    Von dreinisch im Forum IHK-Prüfung allgemein
    Antworten: 5
    Letzter Beitrag: 23.12.2003, 09:17
  4. Dateigröße bestimmen
    Von MatzeT im Forum C und C++
    Antworten: 1
    Letzter Beitrag: 13.04.2002, 13:40
  5. String länge ermitteln in c
    Von skiddoo im Forum C und C++
    Antworten: 8
    Letzter Beitrag: 06.06.2001, 12:59