Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 23:30:16
Anzahl Jahre Zählen aus Datumreihe
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1556to1560
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
1556to1560
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte kopieren und Wert einfügen

Spalte kopieren und Wert einfügen
21.05.2017 15:27:37
Langmantl
Hallo, habe folgende VBA Routine entdeckt.
Sub KopierenAlsWert_1()
Range("n2").Copy
Range("a2").PasteSpecial xlPasteValues
Range("n3").Copy
Range("a3").PasteSpecial xlPasteValues
Range("n4").Copy
Range("a4").PasteSpecial xlPasteValues
End Sub
Es geht darum. ich habe eine Mitgliederliste und möchte den Wert der entsprechenden Zelle in der Spalte n kopieren und nur den Wert in die entsprechende Zelle der Spalte a kopieren. dabei soll die Routine jeweils bei einer neuen Zeile wenn dort Daten eingegeben werden wiederholen. und auch nur für die neuen Spalten, die Werte der Spalten dafür sollen beibehalten werden, es geht nämlich darum, dass ich die Werte in die Spalte a schreiben möchte um bei einer Sortierung den _Wert des Mitgliedes beibehalte.
Also es wird jedem Mitglied eine Nummer zugeordnet, die er ein Leben lang behält, auch wenn er austritt. Der Wert muss kopiert werden, da sonst die Nummer bei einer alphabetischen Sortierung der Mitgliederliste die Nummern nicht beibehalten werden.

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte kopieren und Wert einfügen
21.05.2017 15:50:16
Hajo_Zi
Hast Du Dior mal Deine Aufgabe durchgelesen?
Es soll ein Wert kopiert werden, keine Ahnung welche Spalte und der soll in Spalte N und A kopiert werden. 
in der Spalte n kopieren und nur den Wert in die entsprechende Zelle der Spalte a kopieren.

aber weiter 
die Werte in die Spalte a schreiben

warum muss dann in A kopiert werden?
Gruß Hajo
AW: Spalte kopieren und Wert einfügen
21.05.2017 16:00:30
Langmantl
Nein, der Wert der in Spalte n steht, also habe ich einen Datensatz, in Zeile 2 so soll der Wert aus n2 kopiert werden und in a2 eingefügt werden.
Warum?
Das habe ich doch schon geschildert. Die Mitgliedsnummern werden in der Hilfspaket n aufsteigend ermittelt über die Funktion =WENN(B11="";"";MAX(N$1:INDEX(N:N;ZEILE()-1))+1).
Das soll auch so sein, damit bei Neuanlage eines Mitgliedes die nächsthöhere Mitgliedsnummer vergeben wird.
Wenn jetzt zum Beispiel eine neues Mitglied hinzukommt, bekommt dieses die nächsthöhere Nummer. Wenn ich die Liste dann aber nach Alphabet sortiere, werden die entsprechenden Mitgliedsnummern nicht mutsortiert sondern bleiben star, das hätte zur Folge, dass durch die Sortierung dem Mitglied eine neue Nummer zugeordnet wird, und das darf nicht sein, sondern die, die bei Eingabe vergeben wird soll bleiben, also müssten die Nummern mutsortiert werden, das klappt aber nicht, deshalb habe ich bereits in einem anderen Thread herausgefunden, dass ich theoretisch die Spalte wo der Wert ermittelt wird kopieren muss und denn wert neu einsetzen muss. dies möchte ich aber automatisiert habe3n und nicht jedesmal manuell machen müssen.
Wenn du allerdings eine Komfortablerer Lösung für mein Problem mit der Mitgliedsnummer hast, _ gerne. Hier der Link zu dem Threat mit der Mitgliedsnummer: 

https://www.herber.de/cgi-bin/callthread.pl?index=1557470#bottom

Anzeige
AW: Spalte kopieren und Wert einfügen
21.05.2017 16:14:52
Hajo_Zi
um andere Beiträge kümmere ich mich nicht, da habe ich nicht geantwortet. 
Option Explicit
Sub Kopieren()
Dim LoLetzte As Long
Dim LoI As Long
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 14)), Cells(Rows.Count, 14).End(xlUp).Row, Rows. _
Count)
Range(Cells(1, 14), Cells(LoLetzte, 14)).Copy
Range("A1").PasteSpecial Paste:=xlValues
End Sub
Gruß Hajo
AW: Spalte kopieren und Wert einfügen
21.05.2017 16:17:43
Langmantl
Danke dir

300 Forumthreads zu ähnlichen Themen

Zeilen einfügen und kopieren
bug-i

Hallo, ich brauche eure Hilfe:
Folgende Beispietabelle:
Merkmal - Text
1 - Text1
3 - Text2
1 - Text3
1 - Text4
2 - Text5
1 - Text6
Ich möchte jetzt für jede Zeile, die ein Merkmal größer als 1 hat danach eine neue Zeile mit gleichem Inhalt einfügen.
Die T...
05.08.2009 10:11:39
Thread-ID: 1093668
2 Beiträge
Anzeige
Per Makro Spalten und Formeln einfügen
Kai

Hallo,
ich möchte per Makro zwischen die Zeile M und N 2 Spalten einschieben und dann in ab Zeile 10 in beide Spalten eine Formel einfügen und diese noch unten ziehen.
Neue Spalte N = wenn(L10 ""; L10+100;"")
Neue Spalte O = wenn(M10 ""; M10+100;"")
die ganze Formel sollt...
21.10.2009 14:02:28
Thread-ID: 1111061
3 Beiträge
aus E:E kopieren und am Ende von D:D einfügen
D:D

Hallo,
Ich habe in meiner Adressliste in D:D Straßennamen stehen, und in E:E die Hausnummern. Ich möchte die Hausnummern aber direkt hinter den Straßennamen in die selbe Zelle einfügen.
Da es sehr viele Zeilen sind möchte ich es ungern manuell machen.
Wie würdet Ihr das machen?
19.11.2009 11:46:47
Thread-ID: 1118567
3 Beiträge
Anzeige
Makro kopieren und einfügen fehlerhaft
Chris

Hallo und ein frohes Neues zusammen!
Letzte Woche habe ich folgenden Beitrag geschrieben (https://www.herber.de/forum/archiv/1124to1128/t1126236.htm) und von Jürgen eine schon recht gute Antwort bekommen. Er hat mir folgendes File mit einem Makro bereitgestellt, das glaube ich relativ nahe...
04.01.2010 09:49:22
Thread-ID: 1126968
12 Beiträge
Spaltenbereich ausschneiden und einfügen | Herbers Excel-Forum
Peter
Guten Tag
Ich möchte im ersten Sheet eines bestimmten Workbooks einen Spaltenbereich aus der Spalte P ausschneiden und in Spalte N einfügen.
Ich habe etwas Probleme mit der Syntax.
Wer hilft mir?
Vielen Dank, Peter
With ActiveWorkbook
.Sheets(1).range(cells(1,16),cells(zEnd,...
05.01.2010 10:58:08
Thread-ID: 1127228
7 Beiträge
kopieren und einfügen per makro
rolf

hallo
ich möchte in tabelle 1 - zeile a3 bis a79 kopieren und dann
in tabelle 2 per makro in die erste freie zeile einfügen.
spalte b wird immer ausgefüllt.
wäre dankbar für eure hilfe.
mfg rolf
10.01.2010 22:49:24
Thread-ID: 1128765
11 Beiträge
Userform kopieren und als als Grafik einfügen
Pepi

Hallo zusammen
Ich möchte ein Userform kopieren und als Grafik wieder einfügen, damit ersichtlich ist mit welchen Basiswerten eine Tabelle erstellt wurde (Basiswerte werden über Userform eingegeben)
Ctrl-Alt-Printscreen oder ein Bildschirmprogramm (Snagid) geht nicht, da dies automatisc...
22.02.2010 13:20:05
Thread-ID: 1140312
9 Beiträge
Spalte mit VBA um eine Spalte nach rechts kopieren
Hagen

Hallo zusammen,
ich benötige mal eure Hilfe!
Ich möchte mit einem VBA Code den Bereich A10:A20 nach B10:B20 kopieren, bei erneutem Ablauf des Macros sollte dann der Bereich von B nach C und das nächte mal von C nach D usw Kopiert werde
Ich habe dazu aber leider keine Lösung! und hof...
24.02.2010 12:35:31
Thread-ID: 1141023
8 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
1
8
2
2
14
11
6
10
8
7
9
11
2
5
4
2
3
4
2
1
2
4
5
6
4