Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1352to1356
1352to1356
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro für Excel Tabellenblatt übertragung

Forumthread: Makro für Excel Tabellenblatt übertragung

Makro für Excel Tabellenblatt übertragung
21.03.2014 10:29:40
Nico
Hallo,
Ich benötige ein Makro für Excel bei dem ich eine Information in ein neues Tabellenblatt übertragen kann aber nur wenn es im Falschen Tabellenblatt eingetragen wurde.
Es handelt sich um ein Auftragsbuch bei dem jeder Tag ein anderes Tabellenblatt besitzt. Wenn nun ein Auftrag ausversehen in eine Falsche Tabelle eingetragen wurde sollte Excel dies erkennen und ihn Automatisch in ein neues Tabellenblatt übertragen.
Geht das? Wenn ja benötige ich ein Makro.
Ich danke schonmal im Vorraus!
mfg
Nico S.

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro für Excel Tabellenblatt übertragung
21.03.2014 10:32:16
Rudi
Hallo,
bei dem jeder Tag ein anderes Tabellenblatt besitzt
Halte ich für Quatsch.
Man muss auch an einfache Auswertungsmöglichkeiten denken.
sollte Excel dies erkennen
woran?
Gruß
Rudi

AW: Makro für Excel Tabellenblatt übertragung
21.03.2014 10:51:56
Nico
Hallo Rudi,
wir bekommen täglich sehr viele Aufträge das heißt im groben, es macht Sinn für jeden Tag ein neues Tabellenblatt zu benutzen.
Es wird außerdem ein Anmeldedatum eingetragen d.h. am Tag der Auftragannahme muss es eingetragen werden. Nun kann es ja sicherlich mal vorkommen das es in der eile verpeilt wird und falsch eingetragen wird und genau dann soll Excel erkennen am Auftragsdatum das es im falschen Tabellenblatt steht und dies korrigieren.
Gruß
Nico

Anzeige
AW: Makro für Excel Tabellenblatt übertragung
21.03.2014 11:13:30
Rudi
Hallo,
was sind sehr viele Aufträge?
Bei 1.048.576 Zeilen kannst du über 2.800 Aufträge je Tag erfassen. Das sind alle 30 Sek. einer ohne Pause.
Irgendwann will irgendwer wissen, welcher Kunde mit welchen Artikeln wann wieviel Umsatz gemacht hat.
Dann stehst du da!
Als Ansatz in DieseArbeitsmappe: 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim wks As Worksheet
If Target.Row > 1 Then
If Target.Column = 1 Then
If Target.Count = 1 Then
If Sh.Name  Format(Target, "DD.MM.YYYY") Then
Application.EnableEvents = False
On Error GoTo ERRHDL
Set wks = Sheets(Format(Target, "DD.MM.YYYY"))
With wks
.Activate
With .Cells(.Rows.Count, 1).End(xlUp).Offset(1)
.Value = Target
.Offset(, 1).Activate
End With
End With
End If
End If
End If
End If
Application.EnableEvents = True
Exit Sub
ERRHDL:
If wks Is Nothing Then
MsgBox "Blatt " & Format(Target, "DD.MM.YYYY") & " nicht vorhanden!", vbCritical, "Gebe  _
bekannt..."
End If
Application.EnableEvents = True
End Sub
Gruß
Rudi
Anzeige
;

Forumthreads zu verwandten Themen

suchmaschin mit Dialog Feld in Excel Tabelle
Qi,An

Morgen Zusammen,
tages lang hab ich versucht, ein Suchmaschin mit einer Excel Tabelle zu verbinden, damit man in diser Tabelle nach sitmmte Item suchen kann. Ergebnis wird in zweiter Tabelle gezeigt. aber es hat bis jetzt noch nicht geklappt.
ich würde sehr dankbar sein, wenn jemand a...
25.08.2008 10:30:00
Thread-ID: 1004390
2 Beiträge
Drücken des Button öffnet ander Excel Tabelle und.
Benny

Hallo kann mir jemand helfen?
Wie kann man mit betätigen eines Button eine andere Excelltabelle öffnen und bestimmte Felder übertragen?
07.10.2008 13:14:34
Thread-ID: 1014695
17 Beiträge
Anzeige
Excel Tabellen verknüpfen
marti

Guten Morgen, ich möchte ein Finanz- Reporting mit 6 Betriebsabteilungen aufbauen. Das gibt eine Exceltabelle in der grösse einer A4 Seite. Wenn ich für jeder Abteilung eine seperate Tabelle erstelle und später zb eine Zeile oder Beschreibung des Kopfes ändere, wie erstelle ich die tabellen, da...
09.10.2008 08:37:00
Thread-ID: 1015213
2 Beiträge
excel tabellen vergleichen?
thosrten1896

Hallo,
gibt es eine möglichkeit 2 excel tabellen auf gleichheit zu testen?
datei tabelle 1.xls
diff
datei tabelle 2 .xls
erg. unterschied der datei Tabellen.xls z.B. auf 2 wird der unterschied farblich markiert.
vielen Dank
20.10.2008 09:21:00
Thread-ID: 1017576
2 Beiträge
excel tabellenblatt mit outlook versenden
Hansi

Bitte um Hilfe - ich habe ein VBA Scrip zum versenden einzelner Tabellenblätter:
Sub Blatt_senden() Sheets("NAME").Copy ActiveWorkbook.SendMail "PERSON@PROVIDER", "Aktuelle Zahlen" Application.DisplayAlerts = False ActiveWindow.Close Application.DisplayAlerts = True End Sub
Wie kann...
19.02.2009 10:00:00
Thread-ID: 1052006
5 Beiträge
Anzeige
Excel Tabelle
Conny

Hallo, suche dringend jemanden, der mir ziemlich schnell eine Excel-Tabelle schreiben kann, da ich es selbst nicht hinbekomme. Ich würde auch gern ein paar Euros dafür bezahlen.
Und zwar gehts um folgendes:
Ich muss einen Stamm fester Mitarbeiter eingeben können sowie extra für Mitarbe...
22.03.2009 18:06:10
Thread-ID: 1062680
10 Beiträge
in der Excel tabelle Fehlermeldung "wenn" Aufnahme
harry

=WENN(AF6="";"";WENN($AF$6=5;$D$6;WENN($AF$8=5;$D$8;WENN($AF$10=5;$D$10;WENN($AF$12=5;$D$12; WENN($AF$14=5;$D$14;WENN($AF$16=5;$D$16;WENN($AF$18=5;$D$18;0))))))))
Ergänzung
=WENN(AF6="";"";WENN($AF$6=5;$D$6;WENN($AF$8=5;$D$8;WENN($AF$10=5;$D$10;WENN($AF$12=5;$D$12; WENN($AF$14=5;$D...
03.04.2009 09:54:26
Thread-ID: 1066577
3 Beiträge
Excel Tabelle über 2 Seiten in Word
Ralf

Hallo,
ich möchte eine Excel Tabelle in Word einfügen. Das Problem ist, dass die Tabelle sehr lang ist und über 2 Seiten in Word gehen würde. Sie soll auch automatisch aktualisiert werden, wenn die Originaltabelle in Excel verändert wird.
Gibt es da eine Möglichkeit?
Vielen Dank!
16.04.2009 22:29:58
Thread-ID: 1069191
3 Beiträge
Sharepoint import von Excel tabellen
Excel

Ich kann keine Tabellen aus Excel in Sharepoint exportieren bzw. keine Kalkulationstabelle aus Excel in sharepoint importieren. Fehlermeldung: "Ein unerwarteter Fehler ist aufgetreten" Woran kann das liegen?
Danke
04.08.2009 12:33:12
Thread-ID: 1093401
4 Beiträge
Anzeige
text auslesen in excel tabellenblatt
Michael

Public Sub aufruf() Dim IE Dim Quelltext As String Set IE = CreateObject("internetexplorer.application") IE.navigate "http://www.spotlight.de/" Quelltext = IE.Document.documentElement.outerHTML MsgBox Quelltext IE.Quit End Sub Hallo!
Der text soll im Tabellenblatt 1 als Text ausgebeben w...
04.09.2009 18:23:41
Thread-ID: 1100679
4 Beiträge
Anzeige
Excel Tabelle transportfähig machen?
Benjamin

Wenn sich aus mehreren Tabellen (Dateien) eine Zusammensetzt, zum Beispiel als Zusammenfassung etc. dann kann man dies ja über automatische Zellbezüge erstellen (ich hoffe es ist der richtige Ausdruck dafür).
Wenn ich jetzt allerdings die Zusammenfassung oder was auch immer mal auf einem an...
29.10.2009 00:03:56
Thread-ID: 1112922
3 Beiträge
aus Word mit Makro in Excel Tabellenblatt wechseln
Joni

Hi,
ich habe das Problem, dass ich aus einem Worddokument eine Exceltabelle, die bereits geöffnet ist, aktivieren möchte und dann da aus 2 Tabellenblättern Werte auslesen. Ich komm da einfach nicht weiter.
Excel als Object habe ich definiert. Beim Workbook und Sheet klappt das nicht meh...
31.10.2009 00:38:15
Thread-ID: 1113446
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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