| |
| Xometry Europe erweitert das Angebot um Vakuumguss und Formpressen, eine Pressemitteilung
|
Autor
|
Thema: Tabelle mit versetzten Zeilen (2110 / mal gelesen)
|
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015 [URL=https://ww3.cad.de/index.php/fachbegriffe/]Wissenswertes[/URL]
|
erstellt am: 06. Sep. 2017 18:57 <-- editieren / zitieren --> Unities abgeben:
Hallo an Alle, ich würde gerne eine Tabelle mit versetzten Zeilen erstellen. Siehe JPG. Ich konnte weder im Forum noch bei den bekannten Suchmaschinen etwas finden was mir weiterhilft. Wie und womit kann ich so eine Tabelle realisieren? Danke schon mal für Eure Hilfe. ------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_- Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ThoMay Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 5260 Registriert: 15.04.2007
|
erstellt am: 06. Sep. 2017 20:02 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
|
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015 [URL=https://ww3.cad.de/index.php/fachbegriffe/]Wissenswertes[/URL]
|
erstellt am: 06. Sep. 2017 20:33 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas, danke, werd es mal antesten.
------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_- Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Thomas Harmening Moderator Arbeiter ツ
Beiträge: 2897 Registriert: 06.07.2001 Das Innerste geäussert und aufs Äusserste verinnerlicht
|
erstellt am: 06. Sep. 2017 20:38 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
|
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015
|
erstellt am: 07. Sep. 2017 04:37 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas Harmening und die anderen, in der Aufstellung sollen Teile die dazwischen liegen optisch wie auch tabellarisch dargestellt werden. Beispiel: Bauteil 1 (wird verschraubt mit)4 Stück Schrauben M 12 Bauteil 2 (verschweißt mit) WIG geschweißt Bauteil 3 ... In die "Bauteilzeile" sollen dann Bezeichnungen, Abmessungen, Baugröße, etc. In die "Schrauben-, Schweisszeile" sollen Normteile, Zukaufteile, Schweißverfahren, sonstige Angaben Sinn und Zweck: Abrechnung (lfm, Stück, ...), Dokumentation, Nachweis ... Für weitere Vorschläge bin ich sehr dankbar. EDIT: Und oben und unten (Kopf-/Fusszeile) fortlaufend halt die üblichen Angaben zu Bauvorhaben, Baugruppenname, Ersteller, Bauherr, .... Unten dann Zusammenfassung Datum Unterschrift etc. ------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-
Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ [Diese Nachricht wurde von CAD-Freakle am 07. Sep. 2017 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015 [URL=https://ww3.cad.de/index.php/fachbegriffe/]Wissenswertes[/URL]
|
erstellt am: 07. Sep. 2017 17:14 <-- editieren / zitieren --> Unities abgeben:
Hallo miteinander, habe es jetzt gemacht wie ThoMay beschrieben. Mächtig viel Arbeit war das. @ Thomas Harmening
Zitat: Z.B. Smartart Horizontale Hierachie
Nettes Spielzeug, aber für meinen Zweck leider ungeeignet. Habe dann noch im oberen Bereich den Drucktitel fixiert, alles supie. Leider scheint das für den unteren Bereich der Tabelle nicht zu gehen. Oder doch? ------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_- Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ThoMay Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 5260 Registriert: 15.04.2007
|
erstellt am: 07. Sep. 2017 20:04 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
|
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015 [URL=https://ww3.cad.de/index.php/fachbegriffe/]Wissenswertes[/URL]
|
erstellt am: 07. Sep. 2017 20:27 <-- editieren / zitieren --> Unities abgeben:
Hallo, also. Ich Versuchs mal mit meinen Worten. Tabellenkopf soll Daten zum Bauvorhaben, Baugruppe etc. haben. Ca. 5 Zeilen Dann die versetzten Zeilen mit Daten. Siehe oben. Ca. 20 Zeilen Tabellenfuss mit Unterschriftenfelder (Bauherr, Architekt, abnehmende Stelle) etc. Also eine "normale" Fusszeile geht nicht. Ca. 5 Zeilen. Ich will also den Kopf und den Fuß einmal eingeben und dann die Daten fortlaufend über mehrere Blätter. Danke nochmal für Eure Hilfe. P.S. vom Tablet aus geschrieben. ------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_- Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RL13 Ehrenmitglied V.I.P. h.c. Dipl.-Ing. Bauwesen
Beiträge: 2373 Registriert: 23.10.2008
|
erstellt am: 08. Sep. 2017 09:15 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
|
Thomas Harmening Moderator Arbeiter ツ
Beiträge: 2897 Registriert: 06.07.2001 Das Innerste geäussert und aufs Äusserste verinnerlicht
|
erstellt am: 08. Sep. 2017 12:32 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
bei den Wiederholungszeilen heisst es ja Drucktitel! Es geht nur oben, unten für unten müsste man sich ein Vba Programm schreiben, das die jeweiligen FussZeilen einfügt... oder sinnvoller ein Zählen der Belegten Zellen den Teiler wissen, die zusätzlichen Zeilen für das letzte Druckblatt einfügen und dann per schleife die Zeilen .ausblenden .Drucken .einblenden .ausblenden .Drucken .einblenden .ausblenden until eof
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015
|
erstellt am: 09. Sep. 2017 15:16 <-- editieren / zitieren --> Unities abgeben:
Hallo, @Roman
Zitat: Warum sollen keine 5 Zeilen als normale Fußzeile gehen Im Anhang ein Beispiel mit 2 Wiederholungszeilen als Kopfzeilen und 5 normale Fußzeilen
Schau Dir mal in der Druckvorschau das Ergebis deiner Xls an. Sieht mir nicht nach 5 Zeilen aus. Außerdem kann ich in der Fusszeile keine Rahmenlinien drumrumzeichnen. Also nur unformatiert. Was auch nicht geht, sind dann noch ein, zwei Summenberechnungen. @Thomas Harmening
Zitat: oder sinnvoller ein Zählen der Belegten Zellen den Teiler wissen, die zusätzlichen Zeilen für das letzte Druckblatt einfügen und dann per schleife die Zeilen .ausblenden .Drucken .einblenden .ausblenden .Drucken .einblenden .ausblenden until eof
Tut mir Leid, ich verstehe nicht was Du damit meinst. Vielleicht etwas näher beschreiben. Danke. ------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_- Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ThoMay Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 5260 Registriert: 15.04.2007 SWX 2019 Windows 10 x64
|
erstellt am: 09. Sep. 2017 18:39 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
|
CAD-Freakle Mitglied CAD
Beiträge: 190 Registriert: 05.10.2015
|
erstellt am: 10. Sep. 2017 07:01 <-- editieren / zitieren --> Unities abgeben:
Hallo, danke an Alle, klappt soweit. ------------------ ---------------------------------------------------- Freundliche Grüsse CAD-Freakle INV Prof. 2015 SP2 (Student) _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_- Versuch macht kluch - Sodele, Jetzetle, ab gehts -_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Thomas Harmening Moderator Arbeiter ツ
Beiträge: 2897 Registriert: 06.07.2001 Das Innerste geäussert und aufs Äusserste verinnerlicht
|
erstellt am: 11. Sep. 2017 20:28 <-- editieren / zitieren --> Unities abgeben: Nur für CAD-Freakle
Zitat: Original erstellt von CAD-Freakle: Hallo,danke an Alle, klappt soweit.
Im Prinzip würde ich eine Fusszeile nur dann per Vba definieren, wenn die Fusszeile Berechnungen oder ähnliches enthalten soll. Variante 1 Die Fusszeile wird immer per Vba neu geschieben Variante 2 die Zeilen die die Fusszeile definieren sind am Ende der Tabelle und reagiert auf die veränderten Bereiche zb Teilergebnis hier mal ein quick & dry Code (Fehlenden Zeilen und letzte schleife = Error), der von meinerseite nicht weiterverfolgt wird, da du ja schon eine Lösung hast. BTW Zellenverbinden ist eine Unsitte :-) macht nur mehr Ärger als es Nutzen hat. Code: Sub PrintSheet() Kopfzeile = 2 Fusszeile = 2 letztezeile = Sheets(1).UsedRange.SpecialCells(xlCellTypeLastCell).Row Teiler = 15'hier nuss noch code zum Auffüllen der Zeilen rein f = 0 ' Kenner Erste Schleife sonderbehandlung For x = letztezeile - Fusszeile To Kopfzeile Step -Teiler With ActiveSheet .PageSetup.PrintTitleRows = "$1:$2" .PageSetup.PrintArea = "A1:C100" .Rows("" & Kopfzeile + 1 & ":" & x - 15 & "").Hidden = True If f > 0 Then .Rows("" & x & ":" & letztezeile - Fusszeile & "").Hidden = True f = f + 1 .PrintPreview .Rows("" & Kopfzeile & ":" & letztezeile & "").Hidden = False End With Next End Sub
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |