Office: Tabelle kopieren aber nur bis letzte beschriebene Zeile

Hi,

wie du sehen kannst, wird die Tabelle korrekt übertragen - nur bis zur grau markierten Zeile


Tabelle3

	A	B	C	D	E	F
1	Element	Min	Messwert	Messwert	Max
2	K	0	0,018	0,018	0,03
3	l	16,5	17,4	17,8	18,5
4	m	Rest	Rest	Rest	Rest
5	n	0	1,28	1,28	2
6	o	2	2,39	2,48	2,5
7	p	10	12,4	12,9	13
8		0	0,02	0,02	0,045	Hier sollte abgeschnitten werden
9		0	0,004	0,005	0,03
10		0	0,71	0,72	1
11		0	9,9	10,3	0
12		0	0,005	0,005	0
13		0	0,007	0,007	0
14		0	0,005	0,005	0

verwendete Formeln
Zelle	Formel	Bereich	N/A
A2:E7,B8:E14	=Tabelle1!A2

Tabelle2

	A	B	C	D	E	F
18
19	Element	Min	Messwert	Messwert	Max
20	K	0	0,018	0,018	0,03
21	l	16,5	17,4	17,8	18,5
22	m	Rest	Rest	Rest	Rest
23	n	0	1,28	1,28	2
24	o	2	2,39	2,48	2,5
25	p	10	12,4	12,9	13
26
27

Excel-Inn.de

Hajo-Excel.de

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 23.07 einschl. 64 Bit

 

Jetzt versteh ich gar nichts mehr*rolleyes.gif*
Was hat es auf einmal mit der Formel auf sich*upps ?
Das ist ja der VBA Code

Sub Deutsch_PB()
'
' Deutsch_PB Makro
'

'
Dim ingLetzte As Long
ingLetzte = Application.CountA(Columns(1))
Range(Cells(1, 1), Cells(ingLetzte, 7)).Copy
Worksheets("Prüfbericht_Deutsch").Range("A29").PasteSpecial Paste:=xlValues
End Sub

Dieser funktioniert ja so weit, nur das er eben die Tabelle nicht abschneidet *rolleyes.gif*
Und wenn ich den Button auf das Arbeitsblatt xy legen möchte, das durch den Button von Arbeitsblatt 2 die Tabelle von Arbeitsblatt 2 nach Arbeitsblatt "Prüfbericht_Deutsch" verschoben wird, wie lautet der Befehl*rolleyes.gif*
Bestimmt irgendwas mit worksheets... oder?

Danke nochmal*Smilie

 

Die Formel steht bei dir in der Tabelle und wird durch das Darstellungsprogramm übertragen.
Und wie du sehen kannst, hört die kopierte Tabelle in Spalte A genau mit dem Eintrag "p" auf, so wie in der Ausgangstabelle von dir markiert - sie wird also genau an der richtigen Stelle abgeschnitten.

Soll der Code von einem dritten Tabellenblatt aus ausgeführt werden, musst du auch beim Quellbereich den Tabellenblattnamen davor schreiben, genau wie beim Zieltabellenblatt.

 

Aber ich verstehe immer noch nicht, wie ich VBA dazu bringe das es die Tabelle abschneidet*rolleyes.gif* *rolleyes.gif* *rolleyes.gif*
Denn bei mir wird die gesamte Tabelle übertragen*rolleyes.gif*

 

Dann sieht deine Originaltabelle anders aus als die welche du hochgeladen hast.