Blätter Daten suchen!
20.07.2005 11:53:39
David
Ich hab ein Problem!
Ich habe in einer anderen Tabelle Datenblätter liegen, die nummeriert sind und in der Zelle B28 sind Prozent, die er mir anzeigen soll!
Wenn ich z.b. 50 % in die inputbox eingebe, soll er mir aus der Tabelle alle blätter durchsuchen und anzeigen welches arbeitsblatt mehr oder 50% hat!
Er soll mir die auch untereinander schreiben insofern es mehrere sind!
mein code sieht zur zeit so aus, aber er gibt mir immer nur ds 1. aus was er findet!
-----------------------------
a=9
b=8
ergebnis= val(sheets(i).cells(28,2)) ' ist für Prozente
ergebnis2=val(sheets(i).cells(1,2)) ' ist für die Blattnummer
prozent =inputbox("prozent eingeben")
call jahre 'so heißt die prozedur, die die tabelle öffnet
for i = 1 to sheets.count
if sheets(i).cells(28,2).value 'größer'= val(prozent) then
workbooks("tabelle1").sheets("testauswertung").cells(5,a).value=ergebnis
workbooks("tabelle1").sheets("testauswertung").cells(5,b).value=ergebnis2
end if
next i
bitte um hilfe :(