Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
264to268
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
264to268
264to268
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Sheet links des aktiven...

Sheet links des aktiven...
03.06.2003 18:02:39
Benjamin
Hallo,

ich würde mich gern in einer Verknüpfung dynamisch auf das Blatt links dem aktiven beziehen.

Bsp. Zelle A1 in Blatt 20 soll immer der Wert der Zelle B32 des Sheets stehen, das links von Blatt 20 steht.
(Wenn links von Blatt 20 Blatt 19 steht dann Blatt 20 A1 =blatt19B32, wenn links von Blatt 20 das Blatt 18 steht dann Blatt 20 A1 =Blatt18B32)

Ich wäre dankbar für jeden Ansatz.

Vielen Dank im Vorraus &...

schönen Abend noch!

Benjamin

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Sheet links des aktiven...
03.06.2003 19:14:41
matzeBerlin

Hallo Benjamin,
kannst ja in VBA ein eigenes Modul anlegen und da eine eigene Funktion schreiben. Vielleicht in etwa so:

Public Function getWertLinks(ByVal dieseZelle As Range, ByVal rowOffset As Integer, ByVal colOffset As Integer)
Dim ws As Worksheet
Dim ergebnis As Variant
If r.Worksheet.Index > 1 Then
Set ws = Worksheets(r.Worksheet.Index - 1)
ergebnis = ws.Cells(r.Row + rowOffset, r.Column + Columnoffset)
Else
ergebnis = ""
End If
getWertLinks = ergebnis
End Function

Die Funktion kannst du dann wie eine "normale" Excel Funktion verwenden. Du findest Sie im Funktionsassistenten unter der Rubrik "Benutzerdefiniert". Bei "dieseZelle" einfach die Zelle eingeben, in der die Funktion steht, damit das Makro das Blatt "berechnen" kann.

Nachteil:
Der Wert wird nicht automatisch aktualisiert, wenn Du Blätter durch die Gegend schiebst... Funktioniert nur dann, wenn die Reihenfolge der Blätter halbwegs fest bleibt!

Hoffe, es hilft weiter.
Gruss aus Berlin
Mathias




Anzeige
Re: Sheet links des aktiven...
04.06.2003 08:03:37
Benjamin

Hi,

super danke.
Ist zwar nicht 100%ig das was ich suchte, hilft aber weiter.

HG Benjamin

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige