2016-06-07 6 views
0

Ich habe folgende Aufgabe: VBA Task Ich muss eine Bewertung (Nummer) in jeder der Tabellenzellen in dem Bild eingeben. Ich schrieb den Code, der mich fragt, um einen Wert in Zelle F2 einzugeben (Pop-up-Feld fordert mich auf, einen Wert einzugeben)! Aber ich weiß nicht, wie man es bis J2 und dann bis F3 und so weiter geht, bis ich alle Zellen mit den Zahlen, die ich will, fülle. (Siehe Foto in VBA-Task) Hier ist der Code:VBA - Bewegung von einer Zelle zu einer anderen innerhalb eines definierten Bereichs

Sub GetScore()

Dim QtyEntry As Integer 

    Dim Msg As String 

    Msg = "Please enter Rating" 

    QtyEntry = InputBox(Msg) 

    ActiveSheet.Range("F2").Value = QtyEntry 

    End Sub 

Könnten Sie mir bitte helfen? Vielen Dank!

Antwort

0

Ihre Frage ist nicht sehr klar .. welche Werte möchten Sie in den anderen Zellen? Das gleiche wie Sie in der Inputbox für F2 eingeben? Oder möchten Sie eine Schleife, die nach allen Zellenwerten fragt?

+0

Ja, so in der Box, die mich fragt, um eine Nummer zu füllen, kann ich jede Zahl setzen, die ich will. Zum Beispiel in F2 möchte ich 4 setzen und dann sollte es nach F3 gehen und mich nach einer anderen Nummer fragen, die ich einfügen möchte! Also entscheide ich, welche Nummer der Code nur innerhalb eines vordefinierten Zellenbereichs bewegen soll! Entschuldigung, dass ich nicht klar bin und danke! – RobertC

+0

Also ja, es könnte eine Schleife sein, ich habe nie eine Schleife vorher gemacht, die Sache ist, dass ich Zahlen Zelle für Zelle innerhalb eines bestimmten Bereichs einfügen muss, weil jede Zahl, die ich einfüge, sich von der vorherigen unterscheiden könnte. Vielen Dank! – RobertC

+0

Sie könnten es tun, wie ich in meinem Beitrag bearbeitet – Mono

Verwandte Themen