Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1592to1596
1592to1596
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Erste Eintragszeile ist immer bei 158

Forumthread: Erste Eintragszeile ist immer bei 158

Erste Eintragszeile ist immer bei 158
30.11.2017 07:36:32
Marcus
Hallo zusammen,
Ich habe bei mir das Problem, das in meine VBA immer wieder die Zeile 158 als erste Position zum Eintragen nimmt.... Also nie Zeile 6 wie es eigentlich angedacht ist.... Ich habe in meinem Code nirgends eine Zeile 158 implementiert... Vielleicht hat jemand einen Rat ohne dasich gleich meine komplette Programierung hier offen legen muss.
Mfg Marcus
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW:wie emittelst du die Pos.? gruss owt
30.11.2017 07:39:32
hary
.
AW: AW:wie emittelst du die Pos.? gruss owt
30.11.2017 07:47:33
Marcus
So habe ich das darin stehen:
------------------------
letzteZeile = Sheets(1).UsedRange.SpecialCells(xlCellTypeLastCell).row
~f~ if letzteZeile > 5 Then
~f~ HilfsParm = "A" & letzteZeile
~f~ HilfsParm = Range(HilfsParm) + 1
~f~ Else
~f~ HilfsParm = 1
End If
ActiveSheet.Rows(6).WrapText = True
letzteZeile = letzteZeile + 1
--------------------
Anzeige
AW: AW:wie emittelst du die Pos.? gruss owt
30.11.2017 08:00:17
hary
Moin
UsedRange hat so seine Macken. Excel merkt sich die zuletzt benutzte Zelle. Da kann es auch sein dass du in irgendeine Zelle etwas reingeschrieben hast und wieder loescht.
Eine Moeglichkeit: 
Dim lngLetzeZeile As Long
lngLetzeZeile = Cells.Find(What:="*", After:=[A1], LookIn:=xlFormulas, SearchDirection:=xlPrevious).Row + 1

Kommt eben darauf an wie der tabelleaufbau ist bzw. in welcher Spalte der letzte Eintrag ist.
evtl auch so.Hier wird die letzte benutzte Zelle in SpalteA gesucht und mit +1 ergibt die naechste freie Zeilennummer. 
Dim lngLetzeZeile As Long
lngLetzeZeile = Cells(Rows.Count, "A").End(xlUp).Row + 1

gruss hary
Anzeige
AW: AW:wie emittelst du die Pos.? gruss owt
30.11.2017 08:17:48
Marcus
Vielen Dank für die Antwort.
Jetzt ist hier nur die Sache, wie trage ich das ein so das er ab Zeile 6 eingetragen wird? denn aktuell nimmt er immer Zeile 1?
AW:geht mit Max
30.11.2017 08:25:03
hary
Moin
Vermute du hast diese moeglichkeit genommen.Da kannst du Max nehmen. 
Dim lngLetzeZeile As Long
lngLetzeZeile = Application.Max(6, Cells(Rows.Count, "A").End(xlUp).Row + 1)

heisst wenn:
Cells(Rows.Count, "A").End(xlUp).Row + 1
kleiner 6 dann nimm die 6.
gruss hary
Anzeige
AW: AW:geht mit Max
30.11.2017 08:27:15
Marcus
Ah cool,
vielen Dank versuche ich.
AW: AW:geht mit Max
30.11.2017 08:31:25
Marcus
Funktioniert leider nicht....
Es wird jedesmal die erste Zeile überschrieben....
AW: Bsp.-Mappe bitte
30.11.2017 08:33:42
hary
Moin
Lad mal eine Bsp.-Mappe hoch und sag in welche Spalte eingetragen werden soll. Wir drehen uns im Kreis.;-))
gruss hary
Anzeige
;

Forumthreads zu verwandten Themen

Druckt nicht alles markierte aus der Listbox
Lara

Hi Zusammen
Habe diesen Code in meiner Druckeruserform
Innerhalb einer Listbox markiere ich die einzelnen Blätter die ausgedruckt werden sollen.
Auch wenn ich mehrere markiere druckt er nur das erste markierte Sheet aus. Der Rest nicht.
Private Sub CommandButton1_Click() Dim v...
07.03.2009 13:54:31
Thread-ID: 1057616
7 Beiträge
Anzeige
Druckbereich automatisch anpassen
Wolfango

Hallo zusammen,
in einer Tabelle soll immer nur bis zu einer bestimmten Zeile gedruckt werden (variabel!).
Mit Hilfe einer Formel kann ich ermitteln welche Zeile das ist (das Ergebnis der Formel steht in Zelle 'P5' und hier steht dann bspw. '25', wenn ich möchte dass bis einschl. Zeile...
17.01.2012 09:48:09
Thread-ID: 1246495
7 Beiträge
Seiten nur drucken, wenn Zelle nicht 0
Albert

Hallo liebe Leute,
ich habe eine kleine Vereinsbuchhaltung, die ich mit einer Exceltabelle verwalte.
Jedes Konto ist gleich ein Tabellenblatt. Auf jeder Seite steht für das entsprechende
Konto eine Endsumme. Auf einigen Konten wird nicht jedes Jahr eine Summe gebucht,
so das dor...
19.11.2012 22:48:47
Thread-ID: 1287340
2 Beiträge
Orientierung Druckbereich automatisch anpassen
Gira

Liebes Forum,
dank euch konnte mein gestriges Problem perfekt gelöst werden - vielen Dank noch mal hierfür.
Nun habe ich noch eine weitere Frage:
Mein Tabellenblatt ist dank des gestrigen Makros so aufgebaut, dass abhängig von div. Parametern mal mehr, mal weniger Spalten eingeblend...
25.04.2014 09:39:54
Thread-ID: 1358529
4 Beiträge
Druckbereich automatisch anpassen
matthias

Hallo,
gibt es eine Möglichkeit den Druckbereich automatisch immer erweitern zu lassen entsprechend der Anzahl der Zeilen die einen Wert aufweisen?
Wie kann man so etwas realisieren?
09.04.2015 12:40:10
Thread-ID: 1419887
9 Beiträge
Anzeige
Druckbereich nach Jahr automatisch anpassen
marcel

Hallo,
ich habe folgendes beispielhaftes Tabellenblatt.
Ich würde gerne einen Button haben, durch den nur ein bestimmter Bereich der Tabelle gedruckt wird.
Es soll die Spalte mit der Beschriftung, die Spalte mit den Werten für das aktuelle Jahr, die zwei vorherigen Jahre und die dre...
15.04.2015 12:21:29
Thread-ID: 1420906
3 Beiträge
Dynamischer Druckbereich mit VBA
Mats

Hi Leute,
nach langem suchen im Netz habe ich zwar viele Lösungsansätze für das oben beschriebene Problem gefunden aber keiner funktioniert für mich (bzw. schaffe ich es nicht ihn anzupassen).
Ich will einen dynamischen Druckbereich mit VBA. Als Formel hab ich den Druckbereich bereits i...
03.04.2016 00:09:37
Thread-ID: 1485600
4 Beiträge
Nur die Hälfte aller Seiten drucken
Tobias Braumann

Hallo,wenn man in Excel einen Druckauftrag aus einem aktiven Blatt heraus startet, dann werden automatisch nur die Seiten gedruckt, die auch Inhalte haben (theoretisch ist das Arbeitsblatt ja unendlich groß). Ich suche nach einer Möglichkeit, in einer Routine die Anzahl dieser Blätter abzufrage...
07.09.2002 12:10:07
Thread-ID: 157489
3 Beiträge
Tab mehrmals drucken immer mit anderer Zeile
Peter

Guten Tag
Ich habe eine Tabelle mit Kopfzeilen 1 - 11 und Fusszeilen 30 - 37.
In den Zeilen 12 - 29 sind Daten enthalten, die ich pro Zeile jeweils mit den Kopf- und Fusszeilen ausdrucken will.
Was ist ein guter technischer Ansatz, das mit einem Makro umzusetzen?
Gruss, Peter
14.12.2017 15:18:16
Thread-ID: 1597263
6 Beiträge
Ersten Beiden Zeilen/Spalten immer Anzeigen
PhillipS

Hallo ich habe ein kleines Problem.
Ich habe letztens ein Excel-Datei (Kalender) zugeschickt bekommen, bei der die ersten beiden Spalten immer sichtbar sind, egal wie weit ich nach unten scrolle. (Sodass ich immer die Wochentage sehen kann) Ich möchte dies nun auch bei anderen Exceldateien b...
11.11.2002 11:30:09
Thread-ID: 179656
4 Beiträge
Anzeige
Erstes "ROW" immer mit ausdrucken
Ralf

Hallo!!Ich habe ein Problem. Und zwar möchte ich ein Makro schreiben, dass die Tabelle so formaiert, dass bei mehrseitigen Sheets die allererste Zeile (Row = 1) bei allen Seiten immer mit ausgedruckt wird. Wie ist das möglich?? Danke schon mal vorab,
Gruß
Ralf

12.03.2003 12:52:00
Thread-ID: 230922
2 Beiträge
Tabellenende festlegen
Michael
Hallo allerseits,
ich habe folgendes Problem.
Ich erzeuge per VBA aus einer Tabelle einen extrakt in eine andere Tabelle, die
dann in eine Datenbank (FileMaker) eingelesen wird. Doch leider werden in der Datenbank zu viele Zeile importiert (99 Zeilen) obwohl in der Tabelle nur je nach Mo...
04.11.2003 10:40:28
Thread-ID: 332684
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige