Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon sebal vom 12.11.2019, 09:09 Options
Zellen durchsuchen
hallo zusammen,
ich habe folgendes probelm:
im tabellenblatt "TBT" stehen in dem bereich "AH145:IC145" Werte, der Wert "1.00E-20" kommt mit sicherheit vor.
in diesem bereich soll nun jede zelle (beginnend Bei AH145) durchsucht werden, ob der wert der darin steht "1.00E-20" ist.
ist es ein anderer wert, soll er in die nächste zelle springen, also AI145 und überprüfen.
sobald die Zelle den wert "1.00E-20" hat, soll die anzahl der bisherigen überprüften zellen mit 1 subtrahiert werden und im Tabellenblatt "TBT" in der Zelle AE695 erscheinen.
kann mir hier vllt jemand helfen
vielen dank,
gruß sebal
ich habe folgendes probelm:
im tabellenblatt "TBT" stehen in dem bereich "AH145:IC145" Werte, der Wert "1.00E-20" kommt mit sicherheit vor.
in diesem bereich soll nun jede zelle (beginnend Bei AH145) durchsucht werden, ob der wert der darin steht "1.00E-20" ist.
ist es ein anderer wert, soll er in die nächste zelle springen, also AI145 und überprüfen.
sobald die Zelle den wert "1.00E-20" hat, soll die anzahl der bisherigen überprüften zellen mit 1 subtrahiert werden und im Tabellenblatt "TBT" in der Zelle AE695 erscheinen.
kann mir hier vllt jemand helfen
vielen dank,
gruß sebal
Antwort 1 von morpheus__85 vom 12.11.2019, 13:58 Options
Hallo Sebal,
hab mal folgendes versucht ...
Ich hoffe ich hab das richtig verstanden. Du hast den Bereich AH145 bis IC145 angegeben also nehm ich mal an das du dann in jeder Spalte zwischen AH und IC die 145 Zeile ansehen willst und mehr nicht.
Probier es mal aus ich hoffe es funktioniert und erfüllt deine wünsche.
gruß
morpheus
hab mal folgendes versucht ...
Zitat:
Public Sub test()
Dim x
x = 34
'34 entspricht der Zeile AH
Do
If Cells(145, x).Value = "1.00E-20" Then
Cells(31, 695).Value = x - 1
'31 entspricht der Spalte AE
Exit Sub
Else
x = x + 1
End If
Loop Until x = 238
'237 entspricht der Zeile IC + 1 damit die Spalte IC mit durchsucht wird.
End Sub
Public Sub test()
Dim x
x = 34
'34 entspricht der Zeile AH
Do
If Cells(145, x).Value = "1.00E-20" Then
Cells(31, 695).Value = x - 1
'31 entspricht der Spalte AE
Exit Sub
Else
x = x + 1
End If
Loop Until x = 238
'237 entspricht der Zeile IC + 1 damit die Spalte IC mit durchsucht wird.
End Sub
Ich hoffe ich hab das richtig verstanden. Du hast den Bereich AH145 bis IC145 angegeben also nehm ich mal an das du dann in jeder Spalte zwischen AH und IC die 145 Zeile ansehen willst und mehr nicht.
Probier es mal aus ich hoffe es funktioniert und erfüllt deine wünsche.
gruß
morpheus
Antwort 2 von morpheus__85 vom 12.11.2019, 14:01 Options
Hallo Sebal
hab soeben noch einen Fehler entdeckt.
Du möchstes ja ausgeben, wieviele Zellen schon durchsucht wurden.... also besser bitte folgendes aus.
statt:
Cells(31, 695).Value = x - 1
muss es heißen
Cells(31, 695).Value = x - 33
'33 weil du fängst bei 34 an und willst selbst noch mit 1 subtrahieren also 33
gruß
morpheus
hab soeben noch einen Fehler entdeckt.
Du möchstes ja ausgeben, wieviele Zellen schon durchsucht wurden.... also besser bitte folgendes aus.
statt:
Cells(31, 695).Value = x - 1
muss es heißen
Cells(31, 695).Value = x - 33
'33 weil du fängst bei 34 an und willst selbst noch mit 1 subtrahieren also 33
gruß
morpheus
Antwort 3 von sebal vom 12.11.2019, 14:14 Options
hallo morpheus, danke für deinen tipp und deine mühe,
ich habe es jedoch selbst soeben abders gelöst, aber trotzdem danke.
hab noch ien viel größeres problem, die frage ist bereits im kalender, irgendwas mit diagramme.
also DANKE
gruß sebal
ich habe es jedoch selbst soeben abders gelöst, aber trotzdem danke.
hab noch ien viel größeres problem, die frage ist bereits im kalender, irgendwas mit diagramme.
also DANKE
gruß sebal
Antwort 4 von sebal vom 12.11.2019, 14:17 Options
hallo morpheus,
ich hab dein makro noch mal schnell angeschaut und es sieht so aus wie ich gemeint hätte,
also nur für dich als rückmeldung, du hast die frage richtig verstanden, ok?
danke
sebal
ich hab dein makro noch mal schnell angeschaut und es sieht so aus wie ich gemeint hätte,
also nur für dich als rückmeldung, du hast die frage richtig verstanden, ok?
danke
sebal
Antwort 5 von morpheus__85 vom 12.11.2019, 14:19 Options
Hallo Sebal,
vielen dank für deine Rückmeldung, auch wenn du es vorher dann shcon hattest ;-)
weiterhin viel erfolg beim programmieren
gruß
morpheus
vielen dank für deine Rückmeldung, auch wenn du es vorher dann shcon hattest ;-)
weiterhin viel erfolg beim programmieren
gruß
morpheus
Antwort 6 von gast123 vom 12.11.2019, 14:55 Options
hi all
die findfunction wuerde einiges beschleunigen ausserdem wenn der zu durchsuchende bereich nicht all zu gross ist ,waere ein array auch nicht schlecht
gruss gast123
die findfunction wuerde einiges beschleunigen ausserdem wenn der zu durchsuchende bereich nicht all zu gross ist ,waere ein array auch nicht schlecht
gruss gast123
Ähnliche Themen
Makro soll Summen suchen
woher 16.06.2007 - 123 Hits - 1 Antwort
Ganze Datei durchsuchen
woher 28.08.2007 - 58 Hits - 2 Antworten
Zellen mit textinhalt zusammenfassen???
Anlud 30.08.2007 - 103 Hits - 7 Antworten
Zellen nach gleichem Text überprüfen
Prain 04.10.2007 - 127 Hits - 9 Antworten
windows: ausführen -> durchsuchen... ändern / anpassen
Stupsi2k 24.01.2008 - 51 Hits - 1 Antwort
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
