Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 11:26:57
Probleme mit tbl.Listrows.add
23.04.2024 10:55:14
Zeilen sortieren
23.04.2024 10:23:52
Tabelle 90° drehen + Filteroptionen
23.04.2024 10:11:03
Dateiname plus Wenn vorhanden dann "(1)" anhängen.
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1064to1068
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
1064to1068
1064to1068
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Protokoll von Matthias

Protokoll von Matthias
27.03.2009 10:14:26
Matthias
Hallo Matthias!
Ich wende mich an Dich wegen einer Änderung an Deinem
Protokoll!Könntest Du den nicht so umbauen das die Zeile
immer in der selbe Stelle abgelegt wird(in Zeile4,wks2)
jedoch so das falls neue Data kommt die alten nach Zeile5
runter geschoben wird.So das die letzten Data immer in
Zeile 4 liegen und nicht von Unten angehängt werden?
Dann könnte man die Reihen berechnen!Jetzt aber verschwinden
die Data irgendwo unten und lassen sich nicht mehr bearbeiten.
Grüße
Rolf

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
meinst Du mich ?
27.03.2009 11:27:02
Matthias
Hallo
Lad die aktuelle Mappe hoch.
Ich bin zwar nur noch bis 12:00 Uhr am PC, aber es werden sicher auch andere User helfen.
Die müßten nur Deine Datei sehen.
Mit Deinen knappen Aussagen kann keiner helfen.
Ich bin nichtmal sicher ob ich den Code geschrieben habe,
da ich schon sehr viele Protokolle erstellt habe.
Alles kann man sich eben auch nicht mehr merken ;o)
Bin schließlich auch schon Opa von 2 Enkelkindern.
Ich schaue erst heute Nacht gegn 23:00 Uhr wieder rein.
bis dahin ...
Gruß Matthias L.
AW: meinst Du mich ?
27.03.2009 13:07:04
Rolf
Hallo Matthias!
Hier ist sie-Option Explicit

Sub Protokoll()
Dim Loletzte As Long
Dim wks1 As Worksheet
Dim wks2 As Worksheet
Dim Rng1 As Range
Dim Rng2 As Range
Dim Rng3 As Range
Dim rng4 As Range
Set wks1 = Worksheets("Tabelle1")
Set wks2 = Worksheets("Tabelle2")
Set Rng1 = wks1.Range("B2")
Set Rng2 = wks1.Range("D2")
Set Rng3 = wks1.Range("F2")
Set rng4 = wks1.Range("H2")
If wks2.Cells(Rows.Count, 1).End(xlUp).Row + 1


Anzeige
AW: probier mal ...
28.03.2009 09:18:04
Rolf
Hallo Matthias!
Ich habe jetzt Deine Änderung ausprobiert-es geht leider nicht!
Ein Wert wird unten angehängt und Zeile 4 blebt leer.
Falls ich weiter durchlaufen lasse so bilden sich mehr lehre
Zeilen-Zeile5....Zeile6....
Das Makro sollte jedoch immer in Zeile4 schreiben! Und
Falls es das Zweite mal in Zeile4 schreibt sollte der Inhalt
von Zeile4 nach Zeile5 "gerettet" werden.Somit wird in
Zeile4 immer der letzte Wert stehen und frühere in Zeile5
und weiter unten.
Ist es machbar?
Grüße
Rolf
Anzeige
AW: probier mal ...
28.03.2009 22:36:31
Jens
Hallo Rolf
Versuch mal so: 

Sub Protokoll()
With wks2
Rows(4).Insert
.Cells(Loletzte, 1).Value = rng4 'wert Togglebutton
.Cells(Loletzte, 2).Value = Rng1 'wert aus B2
.Cells(Loletzte, 4).Value = Rng2 'wert aus D2
.Cells(Loletzte, 6).Value = Rng3 'wert aus F2
End With
End Sub


Gruß aus dem Sauerland
Jens

Links zu Excel-Dialogen

ToggleButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige