Hallo zusammen,
ich hab ein Feld z. B. mit den Lottozahlen 1 bis 49 (7 Zeilen, 7 Spalten). In jeder Zelle steht also eine Zahl. Die 6 Zahlen der letzten Ziehung sind fett markiert.
Jetzt möchte ich die fett markierten Zellen in einem anderen Bereich hintereinander auflisten, also z. B.
Feld 1: 3, 17, 24, 32, 36, 47
Feld 2: 5, 18, 35, 42, 43, 44
usw.
Wie mache ich das am besten. Hab schon an FUNCTION gedacht, kriegs aber nicht richtig zusammen.
Alternative:
die Lottozahlen nicht neben- sondern untereinander schreiben?
danach nur „von A-Z sortieren“ - fertig… ?
Und wie kann man Excel beibringen, nach Formatierung „Fett“ zu sortieren?
Gruß,
Kannitverstan
Probier mal folgendes:
Sub Lottozahlen()
Dim cell As Range
x = 1 ' in diese Spalte kommen die Ziehungszahlen
y = 1 ' in diese Zeile kommen die Ziehungszahlen
For Each cell In Selection.Cells ' für den markierten Bereich (alle 49 Zahlen einer Ziehung)
If (cell.Font.Bold) Then
Cells(y, x) = cell.Value ' Zahl kopieren
x = x + 1 ' naechste Zahl kommt in die naechste Spalte
End If
Next
End Sub
Zahlen einer Ziehung markieren, Makro ausführen, fertig.
Wenn du Lust hast, kannst du dir einen Button dazubasteln und/oder die Sache mit der Auswahl über eine Schleife machen und alle Ziehungen automatisch abklappern lassen etc. pp.
Gruß,
Kannitverstan
Hallo,
an das Ziel, wo die Zahl hinsoll, schreibst Du eine Regel / Formel / Bedingung, woher das Ergebnis geholt / berechnet werden soll und in diese Zielzelle kommt.
Eine Regel „hierher wenn fettmarkiert“ gibt es nicht, soweit mir bekannt. Such ne andere Logik / Bedingung…
Hallo,
werden die Zahlen manuell oder über eine bedingte Formatierung fett markiert?
Gruß
Tobias
Hat funktioniert. Das ist genau, was ich gesucht habe. Vielen Dank.