" . Loop" Die mächtigste Funktion eines Computers ist seine Fähigkeit zu automatisieren , und das ist auf einem einfachen Konzept Programmierung genannt basierend Ob die Sprache Visual Basic , Assembler , Fortran, C oder Java ist , kommt die Bequemlichkeit der Rechenleistung aus der Schleife . Grundsätzlich können Sie den Computer anzuweisen , eine bestimmte Aufgabe Hunderte, Tausende oder sogar Millionen von mal zu wiederholen. Es ist einfach, eine einfache Schleife in Visual Basic mehrere Zellen in Excel ändern programmieren. Things You
MS Excel mit VB
brauchen anzeigen Weitere Anweisungen
Typ in einem einfachen Programm mit einer Schlaufe
1
Halten Sie die "Alt" -Taste gedrückt und drücken Sie die " F11 "-Taste in einem neuen Arbeitsblatt in Excel. Sehen Sie in der Visual Basic-Editor , und wenn Sie die Tabelle auf dem Bildschirm statt zu sehen , wählen Sie "Extras" auf "Makro ", und wählen Sie dann " Visual Basic -Editor. "
2
Klicken Sie auf " Einfügen" und wählen Sie " Module". Geben Sie den folgenden Code , wenn Sie den Cursor blinkt unter dem Wort " (General ) " finden Sie unter: .
Sub SimpleLoop ()
Dim I Wie IntegerWorksheets ( " Tabelle1 " ) ActivateRange ("A1 " ) auswählen
' Kommentar: Hier ist der Loop kommt
For I = 1 To 100ActiveCell.Value = IActiveCell.Offset (1, 0) ActivateNext I
. ' . Kommentar : Loop endet an obige Aussage
End Sub
3
Überprüfen Sie den Code sorgfältig auf Fehler - die beiden Zeichen nach dem Wort " SimpleLoop " Klammern sind . Bestätigen Sie, dass Sie den Code genau wie der obige Code ist
4
Führen Sie das Programm : . Wählen Sie "Ausführen ", und wählen Sie dann " Ausführen auf Sub /UserForm. "
5
bestätigen die Ergebnisse des Programms , indem Sie auf den grünen " X " in der oberen linken Ecke des Bildschirms . Beachten Sie, dass das Programm geschrieben hat, die Zahlen von 1 bis 100 in den ersten 100 Zellen auf dem Bildschirm.
Ändern der Programm-
6
Halten Sie die "Alt" -Taste gedrückt und drücken Sie " F11 ". Ändern Sie Ihr Programm auf 100 schnelle Berechnungen und speichern Sie das Ergebnis : Bewegen Sie den Cursor in die Zeile , die liest, " ActiveCell.Value = I" . Ändern Sie es wie folgt :
ActiveCell.Value = 1,05 ^ (I)
7
Führen Sie das Programm . Klicken Sie auf den grünen "X" wieder und bestätigen , dass das Programm 100 Berechnungen und lagerte sie in der Tabelle . Manuell berechnen 1,05 potenziert 2 , um die Berechnung zu verstehen.
8
Löscht den Bildschirm , indem Sie die "Strg"- Taste und die Taste "A" Lassen Sie beide Tasten und drücken Sie " Entf "
9
Alter Ihrem Programm eine Nachricht schreiben 200-mal : " . F11 " Halten Sie die "Alt" -Taste gedrückt und drücken Sie Bewegen Sie den Cursor auf die Zahl "100" und ersetzen Sie es mit " 200 ". Bewegen Sie den Cursor eine Zeile nach unten und ersetzen "I" mit "Ich liebe Berechnen ! " Die Codezeile sollte wie folgt aussehen :
ActiveCell.Value = "Ich liebe computing"
10
Führen Sie das Programm erneut. Klicken Sie auf den grünen "X" wieder und bestätigen , dass das Programm geschrieben hat : "Ich liebe computing! " 200-mal .