Zählschleife fon a bis z ascii Problem

This site uses cookies. By continuing to browse this site, you are agreeing to our Cookie Policy.

  • Zählschleife fon a bis z ascii Problem

    Guten Tag


    ich hab ein kleines Problem. Ich muss einen Festgelegten Bereich in einem
    Excel Blatt auf Inhalt absuchen (von a - z und jeweils ca. 20 Zeilen).
    Das ganze geht auch super wen nicht das kleine Problem wäre das das script
    nicht wirklich bei A anfängt zu zählen. Die Variablen für die spalten werden
    nie mit dem tatsächlichen wert also a oder b oder c usw. gefüllt sondern immer mit
    dem ASCII wert also in dem Fall 97 was wider alles durcheinander bringt.
    Vielleicht kann mir ja jemand nen Denkanstoß geben wie ich wirklich von a nach z
    durch zählen kann. Wehre wirklich super.

    Source Code

    1. Sub scann_filds()
    2. For I = Asc("a") To Asc("z")
    3. For B = 1 To 20
    4. Cells(B, I).Select
    5. If ActiveCell.Value > "3" Then
    6. MsgBox Chr(Cells(B, I).Value)
    7. End If
    8. Next B
    9. Next I
    10. End Sub
    Display All
  • Ok habe es doch noch selber lösen
    können zählt zwar immer noch nicht mit a und b usw. aber
    was
    solls solange es das macht was es machen soll ^^

    Source Code

    1. Sub scann_filds()
    2. For I = 1 To 3
    3. For B = 1 To 3
    4. Cells(B, I).Select
    5. If ActiveCell.Value > "3" Then
    6. MsgBox Chr(Cells(B, I).Value)
    7. End If
    8. Next B
    9. Next I
    10. End Sub
    Display All