Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1100to1104
1100to1104
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wechsel Arbeitsmappe (VBA)

Forumthread: Wechsel Arbeitsmappe (VBA)

Wechsel Arbeitsmappe (VBA)
Detlef
Hallo zusammen,
ich habe folgendes vor:
Arbeitsmappe 1, 2 .... bis 8 sollen per Pfeilführung (Pfeilgrafik und Makro zuweisen) immer ein Arbeitsblatt weiterspringen.
Nun suche ich nach dem passenden Befehl vorwärts wie rückwärts zu gehen. Dabei sollte es nur ein Marko in die eine Richtung und zweites Makro in die andere Richtung geben.
Ist dies möglich?
ich habe es mit "ActiveSheets.next.select" probiert, dies geht aber nur einmal beim zweiten Pfeil passiert nichts mehr...
Danke Euch vorab für Eure Unterstützung!
Gruß
Detlef
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wechsel Arbeitsmappe (VBA)
11.09.2009 14:01:12
Rudi
Hallo,
in ein Modul und den Pfeilen zuweisen: 
Sub vor()
If ActiveSheet.Index 

Sub zurueck()
If ActiveSheet.Index > 1 Then Sheets(ActiveSheet.Index - 1).Activate
End Sub

Gruß
Rudi
AW: Wechsel Arbeitsmappe (VBA)
11.09.2009 14:01:38
JogyB
Hi.
Public Sub voR()
If ActiveSheet.Index = ThisWorkbook.Sheets.Count Then
ThisWorkbook.Sheets(1).Activate
Else
ThisWorkbook.Sheets(ActiveSheet.Index + 1).Activate
End If
End Sub
Public Sub zuRueck()
If ActiveSheet.Index = 1 Then
ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count).Activate
Else
ThisWorkbook.Sheets(ActiveSheet.Index - 1).Activate
End If
End Sub
Gruss, Jogy
Anzeige
AW: Wechsel Arbeitsmappe (VBA)
11.09.2009 16:02:25
Detlef
Hallo zusammen,
ich danke schon mal für Eure prompte Untersützung, ich werde es übers WE ausprobieren!
Danke und Gruß
Detlef
Korrektur/ Verbesserung
11.09.2009 14:04:40
Rudi
besser so: 
Sub vor()
If ActiveSheet.Index 

Sub zurueck()
If ActiveSheet.Index > 1 Then ActiveSheet.Previous.Activate
End Sub
Gruß
Rudi
Anzeige
AW: Korrektur/ Verbesserung
11.09.2009 14:47:37
Luschi
Hallo Rudi,
wenn Tabellenblätter auf 'xlSheetHidden' bzw. 'xlSheetVeryHidden' eingestellt sind, dann klappen beide
zurueck-Routinen nicht. Der Blattwechsel findet nicht statt, wenn das gerade ActiveSheet sich vor einem unsichtbaren Blatt befindet und davor ein weiteres sichtbares Blatt existiert.
Beide Vorwärts-Routinen klappen dagegen und überspringen das unsichtbare Blatt - getestet mit Excel XP/SP 3 und excel 2003/SP2.
Excel verhält sich manchmal schon merkwürdig.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Korrektur/ Verbesserung
12.09.2009 12:24:08
Detlef
Hallo Rudi, hallo Luschi,
es funktioniert bis auf das was Du Luschi beschrieben hast. Vorwärts alles kein Problem, beim Rückwärts bleibt er an den ausgeblendeten Blättern hängen.
Wenns eine Lösung gäbe wäre topp, ich bekomme es aber auch so hin.
Vorab vielen Dank!!! - Hat schon sehr viel geholfen.
Gruß
Detlef
Anzeige
;

Forumthreads zu verwandten Themen

Formel automatisch durch Wert ersetzen (vba)
Tanja

Hallo liebe Leute,
Ich hab in meiner excel-Mappe, in den Zellen: M2:M14 Formeln, die eine ganze Zahl als Ergebnis erzeugen.
So, und nun möchte ich das 1. Berechnungs-Ergebnis quasi "einfrieren".
Mein Problem: Ich möchte kein Makro per Hand auslösen müssen, sondern der Code soll voll...
07.08.2008 21:59:00
Thread-ID: 1000110
5 Beiträge
Stelle für VBA-Crack bei Schweizer Bank
Sand

interessantes Job-Angebot für VBA-Crack unter:
http://www.sarasin.ch/internet/iech/index_iech/about_us_iech/about_us_job_vacancies_iech.htm?jobID=76975
schaut's euch mal an.
cheers,
Sand
08.08.2008 13:37:00
Thread-ID: 1000280
2 Beiträge
Copy Paste Problem mit VBA
Chris

Hallo Leute,
ich habe ein Makro geschrieben, das ein aus SAP gezogenes Spreadsheet in ein formatiertes Excel File umwandelt.
Jetzt taucht plötzlich folgendes Problem auf:
Ein String wird in Zelle "A1" geschrieben, der Buchstaben und steuercode enthält.
D.H. ich habe in dieser Ze...
08.08.2008 15:10:35
Thread-ID: 1000317
11 Beiträge
Watchdop für VBA
peter

Hallo VBA Cracks,
Im 5 Minuten-Abstand hole ich mir via Webabfrage Daten aus dem Internet. Nun kann es passieren, dass das VBA Programm bei einer Abfrage z.B. mehr als 5 Minuten hängen bleibt, was ungewollt ist.
Kann man ein solches Problem umgehen, wenn man mit VBA einen Watchdog reali...
11.08.2008 17:39:00
Thread-ID: 1000934
5 Beiträge
Anzeige
VBA-Formel um nur Berechnungswerte einzutragen
Matthias

Hallo Excel und Makrofans.
Ich habe folgende 2 Probleme. Erstmal zum ersten Problem:
Ich habe eine Datei in der ich Daten (Betriebsparameter [Druck, Temperatur usw.]) aus einem externen Programm einlese. Aus diesen Werten möchte ich gerne einige Werte Berechnen.
Zur Zeit mache ich d...
12.08.2008 08:51:00
Thread-ID: 1001053
6 Beiträge
geschütztes blatt = Fehlermeldung VBA
Pet


Hallo an Alle,
per Button werden 2 Tabellenblätter kopiert und nur die Werte in eine neue Datei gespeichert.
Dies klappt auch wunderbar!
Doch wenn ich die Blätter schütze bekomme ich immer eine Fehlermeldung.
Beende ich diese Fehlermeldung 1004, werden die Blätter trotzdem...
13.08.2008 18:48:00
Thread-ID: 1001622
3 Beiträge
Anzeige
Mittels VBA Zellbereich einfärben
Fred

Hallo zusammen
Ich habe da ein Problem, und zwar stehen bei mir in der Tabelle im Bereich D2 bis AD100 unterschiedliche Datums. Wenn das Datum kleiner ist als das heutige, hätte ich gerne, das sich die entsprechende Zelle Rot färbt. Ich habe das mal mit bedingter Formatierung versucht, aber...
13.08.2008 18:52:00
Thread-ID: 1001623
13 Beiträge
Anzeige
VBA Lösung für Tabellenblattwechsel gesucht
Nila

Hallo.
Ich habe folgendes vor:
Ich lege derzeit eine Exceldatei mit Steckbriefen von ca. 150 Personen an.
Jeder Steckbrief steht dabei auf einem eigenen Tabellenblatt.
Die Tabellenblätter werden nach der entsprechenden Person benannt.
Zum Beispiel: Name von Tabellenblatt 70:...
14.08.2008 10:07:25
Thread-ID: 1001749
8 Beiträge
Kalenderwoche "von bis" über VBA
bis"

Hi Leute,
ich versuch gerade über VBA eine Tabelle zu erstellen. Irgendwie komm ich aber nicht weiter.
Spalte A: Kalenderwoche z.b 1,2,3,4,5, usw.
SpalteB: Datum von bis: 1.1.09-5.1.09; 6.1.09-13.1.09; usw.
Dahinter wird je nach Bedarf eingetragen.
Auffüllen der Zahlen ist k...
19.08.2008 10:24:25
Thread-ID: 1002828
3 Beiträge
Benötige VBA, da Array-Formel nicht funktioniert
oblivion

Hallo, im Anhang meine Datei. Dort habe ich Problem auch schon beschrieben.
Versuche es hier noch mal kurz zu beschreiben.
https://www.herber.de/bbs/user/54731.zip
In meiner Datei habe ich mehrere Tabellenblätter. Auf "Gesamt" werden jeden Monat die entsprechenden Daten eingetragen...
19.08.2008 18:14:00
Thread-ID: 1003018
3 Beiträge
bedingte formatierung berechnen lassen unter vba
morbiuz

Hallo,
ich habe eine Spalte A auf der 2 verschiedene bedingte Formatierungen gesetzt sind (rot, grün) für die Scriftfarbe
leider kann ich die Werte nicht über meine Funktion zusammenrechnen lassen:
Sub mtest() Dim zelle As Range Dim bereich As Range Dim a As Integer Set bereich =...
20.08.2008 03:03:00
Thread-ID: 1003056
2 Beiträge
vba-Datenexport nach Excel2007 -Array mit 70000 DS
Tim

Hallo,
ich habe einen Datenexport aus einem Programm nach Excel in vba. Das ganze funktioniert soweit ganz gut.
Nun möchte ich jedoch nicht, das sjede Zeile aus meinem Programm exportiert wird, daher gibt es ein Array mit entsprechenden Datensätzen: Entweder eine 1 (steht für Export der...
20.08.2008 08:57:00
Thread-ID: 1003084
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige