lG Piston Eine Antwort auf diesen Beitrag verfassen (mit Zitat / Zitat des Beitrags) IP
erstellt am: 18. 2006 13:19 <-- editieren / zitieren --> Unities abgeben: Nur für piston
Hallo piston, ganz kurz und trocken: ich habe mal die Makros umbenannt, wie oben schon mal empfohlen. Makro1 = Public Sub Einlesen() Makro4 = Public Sub Verzahnung() und in Makro 3 steht dann nur noch: Code: Sub Makro3() Call Einlesen Call Verzahnung End Sub Makro3 ausführen und zack damit werden beide nacheinander abgearbeitet. Den Pfad "C:\CAD-de\Down\datenimport\" in Einlesen() mußt Du natürlich wieder ändern! Sub-Prozeduren - Das VBA-Tutorial. Ich stelle die mappe wieder rein. hth Nicole PS: wie vorher: code nicht angeschaut, nur auf "Läuft oder läuft nicht" geprüft, da könnte man bestimmt nochmal straffend tätig werden ------------------ Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße... ---------------- Erfinnder-Gilden-Lehrling Stufe: 5 Eine Antwort auf diesen Beitrag verfassen (mit Zitat / Zitat des Beitrags) IP
Paulchen Mitglied Bauing.
Makros Nacheinander Ausführen
Einfachere Variante: lade eine Beispielmappe mit 2 oder 3 Tabellenblättern und den betreffenden Makros hoch damit man genau sieht wie die Situation in deiner Mappe ist - sonst können wir noch 100 Jahre reden ohne zu einer Lösung zu kommen. 03. 2017, 11:39
# 12
Leider ist es mir hier nicht möglich die Datei hochzuladen. Ich habe eine Testdatei erstellt und ich hoffe die Bilder und der Code sind verständlich. So ist die jetztige Situation:
Sub Feb()
If (i, "B") = "Auto" Then
Sub Jan()
If (i, "B") = "Haus" Then
Worksheets(2)(a, 1) = Worksheets(1)(i, 1)
Worksheets(2)(a, 2) = Worksheets(1)(i, 2)
Worksheets(2)(a, 3) = Worksheets(1)(i, 3)
Worksheets(2)(a, 4) = Worksheets(1)(i, 4)
Worksheets(2)(a, 5) = Worksheets(1)(i, 5)
Sub März()
Worksheets(4)(a, 1) = Worksheets(1)(i, 1)
Worksheets(4)(a, 2) = Worksheets(1)(i, 2)
Worksheets(4)(a, 3) = Worksheets(1)(i, 3)
Worksheets(4)(a, 4) = Worksheets(1)(i, 4)
Worksheets(4)(a, 5) = Worksheets(1)(i, 5)
Sub Löschen()
Range("A5:E50"). Makros nacheinander ausführen. ClearContents
03. 2017, 12:27
# 13
In diesem Fall ist es so, dass du anscheinend Formen eingefügt und diesen das betreffende Makro zugewiesen hast, wobei alle Makros sich in einem Standardmodul befinden.
Sub-Prozeduren - Das Vba-Tutorial
:-) zwischen Himmel und Erde ist nicht immer alles erklärbar:-) manchmal braucht es auch eine gewisse Ambivalenz, damit es zur Zufiedenheit Beider läuft... hmmm,... und bei einigen findet sich sowas, gar als Hassliebe wieder - auch eine Ambivalenz ich gehe mal den Bildschim streicheln^^ *dies ist nur ein offtopic-Beitrag - muss auch manchmal sein* Eine Antwort auf diesen Beitrag verfassen (mit Zitat / Zitat des Beitrags) IP
erstellt am: 18. 2006 12:52 <-- editieren / zitieren --> Unities abgeben:
Hallo Leute, Danke das Ihr Euch die Mühe gemacht habt und das Beispiel nachgebaut habt, nur leider bekomme ich meine Makros nicht hin. Ich habe Euch in der Anlage meine Textdatei und die Module (welche ich in meiner unter Module habe) angehängt. Im Modul1 müßtet Ihr den Pfad für die Textdatei an Euren Speicherplatz anpassen. Modul1 alleine funktioniert Modul2 alleine funktioniert Modul4 alleine funktioniert aber Modul3 (sollte 1 und 4 hintereinander ausführen, funktioniert nicht) Wenn Ihr Euch das Ding mal ansehen könntet DANKE!!!!!!!!
03. 2006 MS-Office 365 ProPlus x86 WIN7(x64)
erstellt am: 10. 2006 07:35 <-- editieren / zitieren --> Unities abgeben: Nur für piston
Hallo piston, Also am Aufruf Code: Sub Makro3() "! Makro1" "! Makro2" End Sub liegt's nicht. Der läuft. Poste doch mal Deine Makros1 und 2, der Wurm muß da drin liegen. Am Besten direkt die ganze Mappe uppen, das spart evtl. weiteres Nachhaken Gruß, Nicole ------------------ Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße... ---------------- Erfinnder-Gilden-Lehrling Stufe: 5 Eine Antwort auf diesen Beitrag verfassen (mit Zitat / Zitat des Beitrags) IP
erstellt am: 10. 2006 07:50 <-- editieren / zitieren --> Unities abgeben: Nur für piston
Nachtrag: Du kannst Dir sowas auch einfacher machen: Solange die Sub Public ist, kann sie direkt angesprochen werden: zu Public und Private siehe Hilfe und das hier Bsp: Code: Sub Makro1() Range("A5:A7") lorIndex = 6 Makro2 End Sub Code: Sub Makro2() Range("C7:C10") lorIndex = 8 End Sub und die Tastenkombination auf Makro1 vergeben, das Makro3 entfällt dadurch komplett.
Recyclinghof St. Mauritz,
Pleistermühlenweg 118 Münster Kontakt Kundenservice
Telefon 02 51/60 52 53
Mo. - Do. 8 - 17 Uhr
Fr. 8 - 16 Uhr
auf Google Maps-Karten anzeigen
Öffnungszeiten Recyclinghof St. Mauritz,
Pleistermühlenweg Mo. 12 - 19 Uhr
keine Zahlung mit EC-Karte Welche Abfälle werden angenommen? Bitte scrollen Sie nach unten.
Recyclinghof Stuttgart Münster, Wertstoffhof - Öffnungszeiten
Öffnungszeiten und Adresse anzeigen
Öffnungszeit, Adresse und Telefonnummer des Wertstoffhof in dem Markt Altomünster
Die exakten "Recyclinghof Altomünster" - Öffnungszeiten sowie die entsprechende Adressdaten finden Sie aufgelistet in der Tabelle weiter unten auf dieser Webseite. Ein Abfallhof ist eine Institution des örtlichen Abfallentsorgers, privater Firmen oder Vereine mit der Aufgabe des Einsammelns und Entsorgung von Bauschutt und Wertstoffen von privaten Menschen und Kleingewerblern. Recyclinghof Stuttgart Münster, Wertstoffhof - Öffnungszeiten. In der Regel sind die typischen Wertstoffe, die je nach Recyclinghof angenommen werden: Sperrmüll, Holz, Schrott, Pflanzenschnitte, Bauschut,, Pappe, Glas, Kleidung,, Leuchkörper, Batterien und einiges mehr. Mancher Abfallhof ist kostenlos, andere erheben kleine Gebühren je nach Müll und Menge. Recyclehöfe werden üblicherweisw in einem Verwaltungsbezirk in Zusatz zu den Mülltonnen und der Sperrmüll-Straßensammlung angeboten. Öffnungszeiten "Recyclinghof Altomünster":
WERWERTWET
Öffnungszeiten Recyclinghof Altomünster
Dienstag 15-18Uhr Mittwoch 10 -12Uhr und 15-18Uhr Donnerstag 15-18Uhr Freitag 15-18Uhr Samstag 9 -14Uhr
Adresse und Telefonnummer des Wertstoffhof in Altomünster:
Recyclinghof Altomünster
Stumpfenbacher Straße 51 85250 Altomünster Telefon: Fax: E-mail:
Alle Angaben auf dieser Seite ohne Gewähr.
Hier bringe ich es hin
Recycling hof - Wertstoff hof
RECYCLINGHÖFE IN STUTTGART
Adresse
Recyclinghof Burgholzstr, Stuttgart
Burgholzstr. 31
70376 Stuttgart- Münster
Service- Center: 0711- 21688700 (AWS)
Öffnungszeiten Recyclinghof:
Dienstag
08:00 - 12:00 Uhr
13:00 - 16:00 Uhr
Mittwoch
Donnerstag
16:00 - 18:00 Uhr
Freitag
Samstag
08:00 - 13:00 Uhr
Alle Rechte vorbehalten © Recyclinghof 2022 - Impressum
Hedelfingen
Plieningen
Münster
Weilimdorf
Vaihingen
Ausgeschlossen ist auf allen Stuttgarter Wertstoffhöfen die Annahme von Altöl, Autoteile, Bauschutt, Bio- und Restmüll sowie imprägnierte Hölzer.