Artikelzuordnung

Forumthread: Artikelzuordnung
6 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Artikelzuordnung

Artikelzuordnung

22.05.2006 13:03:34

Ralph

Hallo Peter.
Funktioniert super. kannst du das makro noch so abändern damit die zugeordneten werte nicht alle in einer Spalte ausgegeben werden sondern jeder wert eine eine eigene spalte und zeile bekommt.

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

doppelt o.w.T.

22.05.2006 13:10:57

Reinhard
AW: Artikelzuordnung

22.05.2006 13:43:17

Peter
AW: Artikelzuordnung

22.05.2006 15:19:12

Ralph
AW: Artikelzuordnung

22.05.2006 17:16:38

Peter
AW: Artikelzuordnung

22.05.2006 17:50:54

Ralph
AW: Artikelzuordnung

22.05.2006 23:23:52

Peter

doppelt o.w.T.

22.05.2006 13:10:57

Reinhard

AW: Artikelzuordnung

22.05.2006 13:43:17

Peter

Hallo Ralph,
dann so, mit Abgleich_II:
https://www.herber.de/bbs/user/33846.xls
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.

AW: Artikelzuordnung

22.05.2006 15:19:12

Ralph

Ja genau so. Super danke Dir.

AW: Artikelzuordnung

22.05.2006 17:16:38

Peter

Hallo Ralph,
so bekommst du es auch noch sortiert - sowohl die Baugruppen, als auch die Artikel in der Zeile.
https://www.herber.de/bbs/user/33849.xls
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.

AW: Artikelzuordnung

22.05.2006 17:50:54

Ralph

Was muss ich denn machen wenn ich daten von einem Tabellenblatt in ein anderes übernhemen will. ich benötige aber folgende zuordnung. Z.B. stehen in tabelle 1 die daten in spalte K in den zeilen 1,2,3, usw. Nun benötige ich diese daten in tabelle 2 in spalte B an den plätzen 528 ,543,558. also immer um 15 zeilen versetzt. geht das?

AW: Artikelzuordnung

22.05.2006 23:23:52

Peter

Hallo Ralph
entweder direkt in die Spalte B bringen, fals das möglich ist, oder kopieren
Public


Sub Kopieren()
Sheets("Tabelle2").Range("B528").Value = Sheets("Tabelle1").Range("K1").Value
Sheets("Tabelle2").Range("B543").Value = Sheets("Tabelle1").Range("K2").Value
Sheets("Tabelle2").Range("B558").Value = Sheets("Tabelle1").Range("K3").Value
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.

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