Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
416to420
416to420
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hilfe

Forumthread: Hilfe

Hilfe
JensZ
Hallo
Ich habe 2 Tab.blätter im 1. darf keine formel oder eine verknüpfung stehen
im blatt 2 steht
D11"test1", E11"test2", F11"test3", G11"test4", G12"test1", H11"test6",
wie kann mann das bewerkstelligen das die einträge in blatt 1 in
B2, B3 ,B4, B5, B6, B7 angezeigt werden.
(bei jedem Importieren wird Tab.blatt1 überschrieben)
Gruß jens
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Hilfe
25.04.2004 13:55:32
Josef
Hallo Jens!
Vieleicht so!

Private Sub Worksheet_Calculate()
Dim myArr() As Variant
Dim intC As Integer
myArr = Array("D11", "E11", "F11", "G11", "G12", "H11")
For intC = 1 To 6
Range("B" & intC + 1) = Sheets(2).Range(myArr(intC - 1))
Next
End Sub
'oder

Private Sub Worksheet_Change(ByVal Target As Range)
Dim myArr() As Variant
Dim intC As Integer
myArr = Array("D11", "E11", "F11", "G11", "G12", "H11")
For intC = 1 To 6
Range("B" & intC + 1) = Sheets(2).Range(myArr(intC - 1))
Next
End Sub

In welches Ereignis du den Code schreibst, hängt davon ab,
wie die daten in "Tabelle1" importiert werden!
Gruß Sepp
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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