Hallo Ich habe ein kleines Problem
ich kopiere nach flogenem Script Daten,
aber am Schluss sind die Daten in den neuen Zeilen markiert... und sie sollten das nicht sein.


Sub Schaltfläche55_BeiKlick()
If Sheets("Produkte programierung").Range("M1") > 0.1 Then
Lrow = Sheets("Lieferschein zum Ausdruck").Range("A50").End(xlUp).Row + 1
If Lrow < 17 Or Lrow > 50 Then Exit Sub
Sheets("Produkte programierung").Range("M1:P1").Copy
Sheets("Lieferschein zum Ausdruck").Range("A" & Lrow).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End If
End Sub

Gruss Martin

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: markierte Zellen

05.01.2007 09:56:46

Ramses
AW: markierte Zellen

05.01.2007 10:13:25

Martin
AW: markierte Zellen

05.01.2007 10:16:02

WernerB.
AW: markierte Zellen

05.01.2007 10:29:42

Martin

AW: markierte Zellen

05.01.2007 09:56:46

Ramses

Hallo
Dann wähle doch einfach eine andere Zelle aus ;-)
Am Ende
Range("A1").select
Gruss Rainer

AW: markierte Zellen

05.01.2007 10:13:25

Martin

Ramses dein Humor gefällt mir :-)
wenn ich aber das mache sind die Zeilen immer noch markiert (vom Ziel der Kopie) und die Zelle A1 von der Quelle der Kopie ist aktiv

AW: markierte Zellen

05.01.2007 10:16:02

WernerB.

Hallo Martin,
wie gefällt Dir das:


Sub Schaltfläche55_BeiKlick()
If Sheets("Produkte programierung").Range("M1") > 0.1 Then
Lrow = Sheets("Lieferschein zum Ausdruck").Range("A50").End(xlUp).Row + 1
If Lrow < 17 Or Lrow > 50 Then Exit Sub
Sheets("Produkte programierung").Range("M1:P1").Copy
Sheets("Lieferschein zum Ausdruck").Range("A" & Lrow).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Sheets("Lieferschein zum Ausdruck").Range("A1").Copy
Sheets("Lieferschein zum Ausdruck").Range("A1").PasteSpecial Paste:=xlPasteFormats
Application.CutCopyMode = False
End If
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !

AW: markierte Zellen

05.01.2007 10:29:42

Martin

Danke Dir du bist meine Rettung ;-)

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle textteil enthält, dann

34081
excel farbe wenn andere zelle bestimmten wert hat

23512
excel teil einer zelle auslesen bis bestimmten zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen in zelle einfügen

16052

excel tabelle lässt sich nicht scrollen

15741

excel zellen kopieren ohne bezug zu ändern

15343

excel enthält

14267

excel wenn zelle text enthält dann andere zelle wert

12306

excel ab zeichen abschneiden

11938

excel erste zeichen löschen

11417

excel summe 0

10634

zelle einfärben wenn andere zelle text enthält

10521

zählenwenn mit oder

9511

excel zeichen abschneiden links

9498

excel wenn zelle textteil enthält, dann

9480

excel wenn wert 0 dann leer

9079

excel vba in zelle schreiben

8864

excel bis zum ersten leerzeichen

8800

excel zählen wenn datum

8428

excel zählen wenn nicht doppelt

8178

excel inhalt einer zelle übernehmen

8062

excel ab einem bestimmten zeichen auslesen

7989

excel text rechts von zeichen ausgeben

7915

wenn größer als und kleiner als

7806

vba excel letzte zeile ermitteln

7675

datum und uhrzeit zusammenführen excel

7521

excel zeilen ausblenden button

7291

minuten in stunden und minuten umrechnen excel

7167

excel zeile ausblenden wenn

7070

excel cursor kreuz

7068

kalenderwoche in monat umrechnen excel

6935

bedingte formatierung excel datum älter als heute

6521

excel summewenn ungleich text

6515

excel spalten nebeneinander untereinander anordnen

6294

excel vba inhalt löschen

6182

excel wenn minus dann null

6026

excel wenn zeit

6006

excel die letzten zeichen einer zelle ausgeben

5981

excel prüfen ob wert in spalte

5920

excel wort aus zelle auslesen

5910

excel zwischen blättern wechseln

5872

excel zahlenreihe fortsetzen funktioniert nicht

5838

excel wenn mehrere zellen leer dann

5829

excel schreibgeschützt durch mich selbst

5734

letztes zeichen entfernen excel

5705

excel formel mit @

5689

excel summe sverweis

5676

wenn zelle leer, dann wert aus anderer zelle

5582

excel zelle nach text durchsuchen

5539

excel uhrzeit plus stunden berechnen

5492

excel vba suchen

5379

zählenwenn zelle nicht leer

5341

summewenn über mehrere spalten

5321

excel führende 0 entfernen

5224

excel zelle färben wenn bestimmter text in anderer zelle

5182

vba abfrage ja nein

5105

excel email adressen generieren

5082

statt #nv 0 anzeigen

5082

vba zellfarbe ändern

5053

excel wenn farbe rot dann

5053

excel buchstaben aus zelle löschen

4974

excel wert übernehmen wenn bedingung erfüllt

4903

summewenn ungleich

4847

excel zeichen anführungszeichen

4841

excel vba zeichen in string suchen

4789

excel datum plus 3 monate

4769

summewenns zwischen zwei datum

4754

vba code schützen

4727

excel zeichen suchen von rechts

4710

excel vba if or mehrere bedingungen

4679

excel diagramm mehrere punkte übereinander

4659

excel format aktualisiert erst nach doppelklick

4654

excel bild in zelle anpassen

4588

excel punkt in zahl entfernen

4564

excel zeichen entfernen links

4556

excel text automatisch in andere zelle übernehmen

4516

vba in zahl umwandeln

4508

excel vba zeilenumbruch in zelle

4482

excel zählenwenn enthält

4469

excel spalte ermitteln in der ein wert steht

4452

excel vba tabellenblatt vorhanden prüfen

4430

excel makro stoppen

4411

excel aktuelles datum einfügen wenn zelle gefüllt

4362

excel formel aus anderer datei kopieren ohne bezug

4360

excel summe runden auf 5 rappen

4357

excel aktuelle uhrzeit formel

4332

excel userform schließen

4327

mittelwert prozentzahlen

4327

excel formel kalenderwoche in datum umwandeln

4324

excel wert suchen und zeilennummer ausgeben

4308

excel verketten datumsformat

4300

excel vba daten in anderes tabellenblatt schreiben

4285

excel gruppieren benennen

4260

gruppieren excel funktioniert nicht

4229

zu viele argumente für diese funktion

4199

vbscript zeilenumbruch im code

4182

dropdown leere zellen ignorieren

4158

filtern trotz blattschutz

4142

excel gestrichelte linien ausblenden

4075

excel jahr heute

4025

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

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle textteil enthält, dann

34081
excel farbe wenn andere zelle bestimmten wert hat

23512
excel teil einer zelle auslesen bis bestimmten zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen in zelle einfügen

16052

excel tabelle lässt sich nicht scrollen

15741

excel zellen kopieren ohne bezug zu ändern

15343

excel enthält

14267

excel wenn zelle text enthält dann andere zelle wert

12306

excel ab zeichen abschneiden

11938

excel erste zeichen löschen

11417

excel summe 0

10634

zelle einfärben wenn andere zelle text enthält

10521

zählenwenn mit oder

9511

excel zeichen abschneiden links

9498

excel wenn zelle textteil enthält, dann

9480

excel wenn wert 0 dann leer

9079

excel vba in zelle schreiben

8864

excel bis zum ersten leerzeichen

8800

excel zählen wenn datum

8428

excel zählen wenn nicht doppelt

8178

excel inhalt einer zelle übernehmen

8062

excel ab einem bestimmten zeichen auslesen

7989

excel text rechts von zeichen ausgeben

7915

wenn größer als und kleiner als

7806

vba excel letzte zeile ermitteln

7675

datum und uhrzeit zusammenführen excel

7521

excel zeilen ausblenden button

7291

minuten in stunden und minuten umrechnen excel

7167

excel zeile ausblenden wenn

7070

excel cursor kreuz

7068

kalenderwoche in monat umrechnen excel

6935

bedingte formatierung excel datum älter als heute

6521

excel summewenn ungleich text

6515

excel spalten nebeneinander untereinander anordnen

6294

excel vba inhalt löschen

6182

excel wenn minus dann null

6026

excel wenn zeit

6006

excel die letzten zeichen einer zelle ausgeben

5981

excel prüfen ob wert in spalte

5920

excel wort aus zelle auslesen

5910

excel zwischen blättern wechseln

5872

excel zahlenreihe fortsetzen funktioniert nicht

5838

excel wenn mehrere zellen leer dann

5829

excel schreibgeschützt durch mich selbst

5734

letztes zeichen entfernen excel

5705

excel formel mit @

5689

excel summe sverweis

5676

wenn zelle leer, dann wert aus anderer zelle

5582

excel zelle nach text durchsuchen

5539

excel uhrzeit plus stunden berechnen

5492

excel vba suchen

5379

zählenwenn zelle nicht leer

5341

summewenn über mehrere spalten

5321

excel führende 0 entfernen

5224

excel zelle färben wenn bestimmter text in anderer zelle

5182

vba abfrage ja nein

5105

excel email adressen generieren

5082

statt #nv 0 anzeigen

5082

vba zellfarbe ändern

5053

excel wenn farbe rot dann

5053

excel buchstaben aus zelle löschen

4974

excel wert übernehmen wenn bedingung erfüllt

4903

summewenn ungleich

4847

excel zeichen anführungszeichen

4841

excel vba zeichen in string suchen

4789

excel datum plus 3 monate

4769

summewenns zwischen zwei datum

4754

vba code schützen

4727

excel zeichen suchen von rechts

4710

excel vba if or mehrere bedingungen

4679

excel diagramm mehrere punkte übereinander

4659

excel format aktualisiert erst nach doppelklick

4654

excel bild in zelle anpassen

4588

excel punkt in zahl entfernen

4564

excel zeichen entfernen links

4556

excel text automatisch in andere zelle übernehmen

4516

vba in zahl umwandeln

4508

excel vba zeilenumbruch in zelle

4482

excel zählenwenn enthält

4469

excel spalte ermitteln in der ein wert steht

4452

excel vba tabellenblatt vorhanden prüfen

4430

excel makro stoppen

4411

excel aktuelles datum einfügen wenn zelle gefüllt

4362

excel formel aus anderer datei kopieren ohne bezug

4360

excel summe runden auf 5 rappen

4357

excel aktuelle uhrzeit formel

4332

excel userform schließen

4327

mittelwert prozentzahlen

4327

excel formel kalenderwoche in datum umwandeln

4324

excel wert suchen und zeilennummer ausgeben

4308

excel verketten datumsformat

4300

excel vba daten in anderes tabellenblatt schreiben

4285

excel gruppieren benennen

4260

gruppieren excel funktioniert nicht

4229

zu viele argumente für diese funktion

4199

vbscript zeilenumbruch im code

4182

dropdown leere zellen ignorieren

4158

filtern trotz blattschutz

4142

excel gestrichelte linien ausblenden

4075

excel jahr heute

4025

markierte Zellen

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

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread