hallo liebe leuts,
also evtl. könnt ihr mir ja helfen ich habe ein problem
zum schreiben einer "formel" in VB für Excel bzw. im makro.
ich wollte per makro folgendes ausführen.
aktiviere Datei 1.xls
gehe zu blatt 16Ungarn
füge eine formel in E2 ein
kopiere diese formel soweit nach unten, wie in spalte a der letzte wert steht.
ich wollte hierbei mir die funktion anzahl2 für spalte a nutzen
denn anzahl2 der spalte a abzüglich 1 ergebe mein formel
beispiel:
in spalte A sind 10 werte (1 überschrift,8 werte, 1 summe)
in zelle E2 steht die formel
somit kopiere zelle E2 nach
E3:Anzahl2(A:A)-1 somit (E9)
hier ist dann mein problem gewesen,
ich weis, dass man dieses problem mit "namen" vergeben lösen könnte aber wie??
ein teil der formel heist somit bestimmt auch
z. b. Test
ActiveSheet.Cells(1, 5).Formula = "=IF(RC[-1]""O"",LOOKUP(RC[-4],[einbau.xls]Risikoklassen!C1,[einbau.xls]Risikoklassen!C[-3]),LOOKUP(RC[-4],[einbau.xls]OS!C1,[einbau.xls]OS!C[-3]))"
Cells(1, 5).Copy
Test = (weisnicht - 1)
Range(Cells(2, 5), Cells(Test, 5)).Select
ActiveSheet.Paste
Application.CutCopyMode = False
und wenn Ihr schon so freundlich ward mir bei der lösung dieses
problems zu helfen, könnt ihr mir sicherlich auch noch einen
kleinen tip geben, wie ich folgendes problem lösen könnte.
prüfe ob datei xy.xls geöffent ist
wenn ja dann gehe schritt 1
wenn nein öffne diese datei und gehe danach zu schritt 1
habt ihr evtl. auch kontaktadressen, die speziell bei excel-problemen
weiterhelfen können (keine hotlines, privat für privat o.s.) oder evtl.
FAQ´s zu spezielleren Excel-,VB-, HTML oder JAVAProblemen.
vielen dank für eure unterstützung
mfg
gorny michael
P.S. Handbücher und Hilfen sind zwar ganz schön, aber leider ist nicht immer die lösung offensichtlich.
gorny@gmx.de
Manuela
