Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1648to1652
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
1648to1652
1648to1652
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formeln "Ziehen" mit Sprung

Formeln "Ziehen" mit Sprung
16.10.2018 09:26:57
Oliver
Hallo Liebes Forum.
Ich habe eine Frage und hoffe auf Eure Hilfe.
Ich möchte gerne Werte in einem Tab mit Werten aus einem anderen Tab verlinken.
Also:
in TabA: A1 ='TabB'!D3
der nächste Wert soll dann in A2 stehen, der Wert aus TabB aber kommt von ein paar Zeilen weiter unten.
in TabA A2 = 'TabB'!D9
So muss ich eine ganze Tabelle mit über 500 Einträgen "Zusammenziehen" und "Kippen"
Der Abstand der Werte in TabB ist immer gleich. (immer +6 Zeilen)
Zum Schluss soll das so ausschauen:
in TabA: A1='TabB'!D3 || A2='TabB'!D9 || A3='TabB'!D15 || ..... (500 mal)
Ich habe nun versucht die Formel mit der Maus nach rechts zu ziehen, aber das funktioniert leider nicht.
Hat vielleicht jemand eine Idee, wie ich mir die 5h Arbeit sparen kann, das alles manuell rein zu tippen?
Vielen lieben Dank schonmal und einen schönen Tag noch.
Viele Grüße
Oliver

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
TabA!A1: =INDEX(TabB!D:D;ZEILE(A1)*6-3)
16.10.2018 09:33:25
lupo1
TabA!A1: =INDEX(TabB!$D:$D;SPALTE(A1)*6-3)
16.10.2018 09:59:48
lupo1
AW: Formeln "Ziehen" mit Sprung
16.10.2018 09:52:01
Oliver
Hallo,
erst mal danke für die schnellen Antworten!!!
@SF: Weil ich die Werte aus mehreren Identischen Excel Tabs zusammenziehen möchte und die Darstellung so einfach besser wäre. Später sollen die Werte "Copy&Pasted" werden, und das Zielformat ist leider "Quer"
@lupo1: Danke dir. Klappt leider nicht ganz. Er spring ganze 30 Zeilen Weiter runter (Zeigt den Wert aus TabB!D30 . Und wenn ich die Formel nach rechts ziehe, dann zeigt er mir immer den gleichen Wert an aus TabBD30 an. (Habe ich getestet, wenn ich den Wert in TabB D30 überschreibe, ändern sich alle Werte)
Und warum schreibst du …*6-3) ? Ich hätte nur ein +6 erwartet oder so, kenne aber die INDEX Funktion bis jetzt nicht...
Danke euch und viele Grüße
Oliver
Hast du noch eine Idee?
Anzeige
AW: Formeln "Ziehen" mit Sprung
16.10.2018 10:15:52
Armin
Hallo Oliver,
ich würde das ganz anders angehen.
öffne die VBA Umgebung mit Cursor auf Tab-Name und rechter Maustaste wähle aus dem
Kontextmenü "Code anzeigen" aus.
Kopiere den Code in die TabB und stelle Cursor auf Formeleintragen (im Code nach Sub oben) und betätige die Taste F5.
Jetzt müssten die Formel eingetragen sein.
Der Code: 
Sub Formeleintragen()
Dim Rx As Range
Dim Abstand As Integer
Dim N As Integer
Const Anzahl As Integer = 500 ' Anzahl der Zeilen eingeben
Abstand = 6
N = 3
For Each Rx In Range("A1:A" & Anzahl)
Rx.FormulaR1C1 = "=R" & N & "C[3]"
N = N + 6
Next
End Sub
Die Anzahl der Zeilen kannst Du anpassen jetzt(500). N=3 Startzeile in D und Abstand =6
Könntest Du auch anpassen.
Gruß Armin
Anzeige
AW: Formeln "Ziehen" mit Sprung
16.10.2018 12:38:02
Oliver
Hallo Armin,
danke dir für deine Hilfe. Leider machte der Code nur bedingt, was ich braucht. Ich bräuchte es quer (deiner schreibt die Formeln untereinander)
Aber den Code merke ich mir vielleicht mal für Später.
Ich habe jetzt die Formeln manuell erstellt.
1. (Die Ursprungswerte habe ich in eine neues Tab mit "Verlinkung" (A1=A1; A2=A2; A3=A3; etc) Nachgestellt. Damit habe ich schonmal alle Formeln.
2.Dann habe ich alle Zeilen gelöscht, die ich nicht brauchte (… immer die 6 dazwischen aus der Beschreibung) - mit Hilfe eines Filters ging das recht einfach.
3. Alle Formeln "absolut gesetzt"
4. it Copy Paste die Tabelle "gekippt"
Hat im Endeffekt auch zum Ziel geführt.
Euch aber allen einen "herzlichen Dank" für die Hilfe und Ideen.
Viele Grüße
Oliver
Anzeige
Schade, dass Du nicht alles probierst ...
16.10.2018 12:47:05
lupo1

18 Forumthreads zu ähnlichen Themen

Formel bis Datei-Ende kopieren
Gerhard

Hallo Zusammen,
ich gebe eine Formel in ein Feld ein (noch kein Problem). Nun möchte ich diese Formel in die restlichen
Felder der Spalte kopieren (Anzahl Datensätze ist immer unterschiedlich). Markiere ich nun die Spalte und "sage" einfügen, kopiert er die Formel bis zum Datensatz 6500...
30.03.2010 08:56:46
Thread-ID: 1149267
10 Beiträge
Anzeige
Formeln nach unten kopieren bis anzugebender Zeile
Stefan

Hallo.Ich habe folgendes ProblemIch möchte von VBA in einem Sheet eine Formel nach unten kopieren lassen.
Bislang sieht das bei mir so aus: Range("G1:G1").Select
ActiveCell.FormulaR1C1 = "=IF(RC[-2]="""","""",C[-1]/C[-2])"
Selection.AutoFill Destination:=Range("G1:G...
13.05.2002 16:02:06
Thread-ID: 120530
4 Beiträge
Rahmen und Formel bis Ende der Tabelle
Alex105

Hallo Zusammen,
ich habe eine Tabelle, die ich mithilfe von einem Makro formatieren lasse. Jetzt benötige ich für 2 Punkte innerhalb dieser Tabelle mal bitte Eure Hilfe.
1. Punkt: In E2 fängt eine Wenn-Formel an, die bis ans Ende der Tabelle laufen soll (Tabellenlänge ist dynamisch)
...
12.05.2014 10:31:47
Thread-ID: 1361048
8 Beiträge
Anzeige
Formel herunterziehen mit VBA
team11team

Liebes Forum,
ich habe eine Kopierfrage an euch.
Ich würde gerne einzelne Zellen (B8,f8,h8,j8) die Formeln enthalten mit VBA herunterziehen (AutoFill?). Ich hab mir das über den Makrorecorder, für einzelne Zellen schon angeschaut, konnte mir das aber leider nicht so umwandeln das es fu...
21.07.2015 09:15:52
Thread-ID: 1437541
6 Beiträge
Tab. speichern und eine Zeile weiterspringen
PaulR

Hallo,
ich habe folgendes Problem: ich habe in Excel (klar, wo denn auch sonst. Wenn ich schon hier frage...) eine Tabelle erstellt, über die einfach und schnell Daten eingegeben werden können. Soweit so gut. Nun möchte ich diese Daten in einem zweiten Tabellenblatt speichern und danach (in...
08.08.2002 16:17:35
Thread-ID: 146415
3 Beiträge
Alle Formeln in Range c5:P5 bis Ende kopieren
hp
Hallo zusammen,

folgendes Problem: Ich möchte in Range(c6:p?)die Formeln aus c5:P5 per VBA ausfüllen.

Für eine Spalte habe ich den Autofill-Befehl. Um in dem ohnehin riesigen Makro die Übersicht zu behalten, möchte ich nicht für jede Spalte den Code erneut hinterlegen.

Ab spa...
13.10.2003 16:31:22
Thread-ID: 322918
3 Beiträge
Formeln bis zum Ende kopieren
Thorsten
Hallo Leute,
ich habe ein glaube ich ganz alltägliches Problem, welches ich über die Suche nicht finden konnte:
Ich habe immer recht lange Tabellen und muß Formeln von Zeile 1 bis ~20.000 kopieren - aber nur bis genau zum Tabellenende und nicht darüber hinaus.

Gibt es eine einfach Mögl...
18.11.2003 10:28:27
Thread-ID: 339635
4 Beiträge
Einfügen einer Formel bis zum Spaltenende
Paul

Hallo Excelfreunde,
ich hab mal wieder ein Problem mit den letzten Spalten. Folgendes:
Ich habe ein Macro geschreiben welches eine Formel(Art ist völlig egal) bis zur letzten Spalte einfügen soll.
ActiveCell.FormulaR1C1 = _
"=CONCATENATE(1,""-"",RC[2]:R[9998]C[2],""-"",RC[3...
03.11.2004 03:11:48
Thread-ID: 510929
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
9
3
3
7
9
5
2
2
3
2
3
4
2
8
3
1
4
9