Arbeitsblattsprung nach Formelgleichung ! :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

Arbeitsblattsprung nach Formelgleichung !

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 18:39

Hallo liebe Excel-Gemeinde !

Bin neu hier und habe schon einige nützliche Beiträge gelesen !
Nun habe ich aber eine Frage , die ich mir auch durch eine Suche nicht beantworten konnte !
Vieleicht könnt ihr mir ja weiterhelfen !

Würde gerne wissen , ob es möglich ist nach einer Formelberechnung einen Arbeitsblattsprung zu machen !

Beschreibung:
Sollte das Ergebniss zweier Zahlen in Arbeitsblatt 1 (10 - 11 = -1 ) kleiner 0 sein springe zum Arbeitsblatt 2
Ist so etwas möglich ?

Vielen Dank im vorraus
heinz

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 05.12.2007, 18:57

Hallo!

Wenn das "ganz" automatisch passieren soll, dann brauchst du VBA.
Wenn ein einziger weiterer Klick noch im Rahmen des Vertretbaren liegt, dann geht's auch mit einer Formel:

=WENN(A1>A2;HYPERLINK("#Tabelle2!A3";"hüpf");HYPERLINK("#Tabelle3!A4";"spring"))

Wenn der Wert in A1 größer ist als A2, dann springst du nach einem Klick auf die Formelzelle zu "Tabelle2!A3", in allen anderen Fällen nach "Tabelle3!A4".

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 19:19

Erstmal Danke für die schnelle Antwort !

Das mit dem Link funktioniert schon gut , hätte es aber gerne ohne klick !
Wie bekomme ich es mit VBA hin ?
Kenne mich nicht so gut aus mit Makros !

MfG Heinz

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 05.12.2007, 19:25

Um welche Zellen handelt es sich denn genau?
Erfolgen die Eingaben direkt in diese Zellen, oder stehen dort Formeln drin?
Die Änderung welcher Zelle soll Auslöser für den Sprung sein?

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 20:18

Hallo Schatzi!

Also die Zelle die den Sprung auslösen sollte ist die K20 !
In der Zelle K20 steht eine Formel , welche eine Summe erstellt !

Vielen Dank im vorraus und auch ein Danke für die super schnelle Hilfe von Dir

MfG Heinz

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 05.12.2007, 20:33

Hallo!

Dann kopiere mal diesen Code ins Modul deines Eingabeblatts:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("K20") < 0 Then
Sheets("Tabelle3").Activate
ActiveSheet.Range("B3").Select
End If
End Sub

(Die Bezüge musst du natürlich anpassen.)

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 21:24

HI !

Habe es im Modul eingefügt , aber nichts passiert wenn K20 unter 0 ist !?
Hast du noch einen tip?

Mfg Heinz

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 21:44

Soooooorrrrrrrrrrrrrrrrrrrryyyyyy !

Mein Fehler hatte es in der falschen Tabelle !

Vielen vielen Dank für die super schnelle und kompetente Hilfe !
Klappt wunderbar !

MfG Heinz

Bis demnächst Wink

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 21:54

Hi ich nochmal !

Kann ich auch mehrere Worksheets in einer tabelle verwenden ?
Bekomme eine Fehlermeldung , wenn ich den gleichen text mit anderen bezügen rein kopiere !

MfG Heinz

Zuletzt bearbeitet von heinz123 am 05.12.2007, 21:59, insgesamt einmal bearbeitet

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 05.12.2007, 21:59

Wie meinst du das?
Verstehe ich nicht...

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 22:00

Also wenn ich durch k20 z.b. auf tabelle 2 gelange und durch k19 auf tabelle 3 möchte !

MfG Heinz

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 05.12.2007, 22:40

Dann baust du's mit ein:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("K20") < 0 Then
Sheets("Tabelle3").Activate
ActiveSheet.Range("B3").Select
End If

If Range("K19") < 0 Then
Sheets("Tabelle2").Activate
ActiveSheet.Range("J17").Select
End If

End Sub

Bleibt nur die Frage, was passieren soll, wenn beides zugleich eintritt. Aber ich hoffe, dieser Fall ist bei dir ausgeschlossen.

heinz123
Newbie
Newbie

Anmeldedatum: 05.12.2007
Beiträge: 21

Verfasst am: 05.12.2007, 23:00

danke dir klappt super !

der fall das beides eintritt ist eigentlich nicht möglich aber danke für den hinweis!

schönen abend und nochmals danke !

mfg heinz

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Datei nach dem Speichern verschwunden	schisa	Microsoft Word Hilfe	0	28.11.2008, 00:10
	Spalte überprüfen, bestimmten Text na...	CrazyCat	Microsoft Excel Hilfe	8	27.11.2008, 14:05
	Gross- Kleinschreibung nach Punkt	sipa67	Microsoft Excel Hilfe	2	22.11.2008, 12:52
	Zelleninhalte abgleichen nach Doppelten	Knuddl	Microsoft Excel Hilfe	7	19.11.2008, 10:42
	Tabelle nach Seitenumbruch in 2. Zeile	OmaWetterwachs	Microsoft Word Hilfe	0	19.11.2008, 09:43

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de