Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
876to880
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
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

markierte Zeile mittels Makro kopieren

markierte Zeile mittels Makro kopieren
14.06.2007 07:09:55
ilka
Hallo,
folgendes möchte ich gern erreichen:
Im beigefügter Datei markiert der Anwender die ersten beiden Felder einer Zeile. Mittels Button soll er dann folgende Aktion ausführen können: Die Zeile, in welcher die Markierung vorgenommen wurde, soll komplett in das Tabellenblatt "Löschungen" kopiert werden, der Eintrag soll sich an die bereits bestehenden Datensätze anschliessen bzw. in die nächste leere Zeile kopiert werden. Im Tabellenblatt, wo die Markierung vorgenommen wurde, sollen die beiden markierten Felder mit "0" überschrieben werden.
https://www.herber.de/bbs/user/43236.xls
Kann mir jemand helfen?
Vielen Dank!

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

Betreff
Datum
Anwender
Anzeige
AW: markierte Zeile mittels Makro kopieren
14.06.2007 07:38:00
Beverly
Hi Ilka,
kopiere diesen Code in ein allgemeines Modul

Sub uebertragen()
With Worksheets("Löschungen")
Selection.EntireRow.Copy .Cells(IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(.Rows.Count, _
1).End(xlUp).Row, .Rows.Count) + 1, 1)
Selection = 0
End With
End Sub


Erstelle in der Tabelle "Übersicht" eine Schaltfläche aus der Formular-Symbolleiste und weise ihr dieses Makro zu.
________________________________________

AW: markierte Zeile mittels Makro kopieren
14.06.2007 10:36:38
ilka
Hallo Karin,
vielen Dank, hat alles gut funktioniert.
Ich würde gern noch eine Art Sicherheitsabfrage einbauen, so dass nach Betätigen des Buttons "austragen" gefragt wird, ob der markierte Datensatz tatsächlich entfernt werden soll. Desweiteren soll mit dem Übertrag der Zeile im Tabellenblatt "Löschungen" hinter der Spalte Bemerkungen mit Übertrag eines Datensatzes gleichzeitig das Datum des Übertrages abgespeichert werden - geht das?
Zusätzlich habe ich die Aufgabe, über einen weiteren Button die Erstellung eines Sicherungskopie der Datei zu veranlassen, welche dann in einem separaten Ordner x unter dem alten Dateinamen zuzüglich Datum und Uhrzeit abgespeichert werden soll.
https://www.herber.de/bbs/user/43239.xls
Kannst Du mir auch hierbei helfen?
Vielen Dank im voraus.
Ilka

Anzeige
AW: markierte Zeile mittels Makro kopieren
14.06.2007 12:18:00
Beverly
Hi Ilka,
zur 1. Frage

Sub uebertragen()
Dim strAnzeige As String
Dim loLetzte As Long
strAnzeige = MsgBox("Daten wirklich löschen?", vbYesNo)
If strAnzeige = vbYes Then
With Worksheets("Löschungen")
loLetzte = IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(.Rows.Count, _
1).End(xlUp).Row, .Rows.Count) + 1
Selection.EntireRow.Copy .Cells(loLetzte, 1)
Selection = 0
.Cells(loLetzte, 8) = Date
End With
End If
End Sub


zur 2. Frage


Sub sicherheitskopie()
ThisWorkbook.SaveCopyAs "C:\test\" & Mid(ThisWorkbook.Name, 1, Len(ThisWorkbook.Name) - 4) & _
"_" & Date & "_" & Format(Now, "hh_mm_ss") & ".xls"
End Sub


Pfadname bitte anpassen. Uhrzeit wird als 12_20_15 abgespeichert, da ":" im Dateinamen nicht erlaubt ist.
Bis später,
Karin

Anzeige
AW: markierte Zeile mittels Makro kopieren
14.06.2007 23:07:39
Ano
Liebe Karin,
herzlichen Dank, es funktioniert !!
Gruß
Ilka
PS: Inzwischen habe ich auch gemerkt, dass man die Folgebeiträge nicht als neue Frage ins Forum stellt....
Sorry

188 Forumthreads zu ähnlichen Themen

Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Anzeige
Word nach Excel kopieren mit Zeilenumbruch/Absatz
Christian

Hi Leute,
hab jetzt mal rumgesucht im Archiv, aber leider nichts gefunden.
Habe ein Word-File, das ich jetzt nach Excel übertragen will.
Ich kopiere hierfür Zeile für Zeile, was auch wunderbar funktioniert.
Was ist jedoch, wenn ich in der Word-Tabelle einen Zeilenumbruch habe?
04.11.2008 07:42:00
Thread-ID: 1021456
5 Beiträge
Zeilen mit ähnlichem Inhalt kopieren
Lauren

Hallo zusammen,
sitze wiedermal hier in VBA/Excel fest und hoffe auf Hilfe :)
Ich habe eine Excel Datei mit ca. 7000 Zeilen.........nun möchte ich die Inhalte etwas übersichtlicher gestalten aber händisch wäre das ja ein riiiiiiiiiesen Aufwand, daher bin ich auf der Suche nach einem Mak...
10.02.2009 14:31:49
Thread-ID: 1049097
4 Beiträge
Anzeige
Makro um Zeilen mit gleichem Inhalt zu kopieren
christian

Hallo,
vielleicht kann mir jemand von euch helfen....
Ich habe eine Ausgangstabelle mit verschiedenen Produktnummern in Spalte A und unterschiedlichen
anderen Informationen in den Spalten B-U. Die Daten in dieser Tabelle habe ich sortiert, so dass in Spalte
A alle gleichen Produ...
15.10.2009 18:56:31
Thread-ID: 1109906
8 Beiträge
Formel kopieren mit VBA bis leere Zeile
jo_cindy

HAllo, habe noch keine Formel im Archiv gefunden, die bei mir funktioniert.
Ich möchte in Spalte X ab Zeile 2 die folgende Formel einsetzen: Selection.NumberFormat = "h:mm"
ActiveCell.FormulaR1C1 = "=RC[-8]/24" Diese Formel soll dann in Spalte X solange kopiert werden, bis in Spalte A...
27.10.2009 11:02:17
Thread-ID: 1112437
6 Beiträge
leere Zeile mit Text und Formel dynamisch einfügen
christian

Hallo zusammen,
ich habe folgendes Problem das ich mit meinen wenigen VBA Kenntnissen nicht lösen kann.
Ich habe eine Tabelle mit n Zeilen.
- Nach jeweils ca. 53 Zeilen sollte eine Zeile mit dem Text "Zwischentotal " (Spalte C) und in die Summen-Formel für die 53 Zeilen (Spalte H)...
28.11.2009 13:36:30
Thread-ID: 1120637
3 Beiträge
Zellen mit Formeln einer Zeile kopieren
Jürgen

Hallo VBA-Profis,
da ich hinsichtlich VBA ein Anfänger bin, hoffe ich hier im Forum Hilfe zu bekommen.
Ausgangslage:
In größeren Excel-Tabellen sind neben Daten auch Formeln vorhanden.
Tabelle beginnt z.B. ab A4 und erstreckt sich bis Z800 (Zeile 4 sind Überschriften)
In den...
13.12.2009 15:54:18
Thread-ID: 1123590
3 Beiträge
Formatierung anderer Zelle mittels Formel kopieren
sunny8_de

Hallo.Ich weis absolut nicht, wie ich mittels einer Formel die bereits bestehende Hintergrundfarbe einer Zelle in eine andere kopieren/übernehmen kann.Wer kann mir hierbei behilflich sein.Wünschenswert wäre eine Realierung per Formel (ansonsten halt per Makro).Vielen Dank!!!
11.04.2002 10:41:26
Thread-ID: 112359
4 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
4
9
4
3
5
7
5
2
2
3
3
1
8
2
2
2
4
7
2
3
1
2
4
14
4