Zum Inhalt springen
View in the app

A better way to browse. Learn more.

Fachinformatiker.de

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Excel:Tabellenzeilen umwandeln in einzelne "Berichts-Blätter"

Empfohlene Antworten

Hallo zusammen,

ich möchte versuchen, aus einer excel-tabelle eine Art Journal für jeden Datensatz zu erstellen.

Die Daten-Tabelle schaut wie folgt aus:

Nr.___Name___Vorname___Attr1___AttrN

================================

01___test_____inge______rot_____blau

02___....

Das "Journal" soll aus jedem Datensatz ein einzelnes Tabellenblatt in der Form

Nr: 01

Name: test, inge

Autofarbe: Rot___________Lieblingsfarbe: Blau

machen. Alternativ wäre auch die Ausgabe, z.B. als Worddoc denkbar.

Die Formatierung des Journals soll allerdings festgelegt werden.

Da ich :rolleyes: noch nie mit VB was zu tun hatte, wollte ich das als Anlass nehmen mich da ein wenig einzuarbeiten.

Ich hoffe mir kann jemand den Denkanstoss geben, wie man sowas realisieren könnte, bzw. eine generelle Vorgehensweise vorschlagen.

Danke schon mal

Gruß

Grisu84

wenn du innerhalb von excel mit registerblättern (worksheets) arbeiten möchtest, schreibe eine routine, die aus jeweils einer einzelnen zeile im hauptblatt (meinetwegen "journaleinträge") ein separates neues blatt innerhalb der arbeitsmappe anlegt. das kannst du mit add tun:

Worksheets.Add [before], [After], [Count], [Type]

dieses blatt adressierst du dann mit

Worksheets.Item(1) oder Worksheets(1)

innerhalb des arbeitsblattes kannst du dann formatierungen angeben, z.b.

Range("A1:B2").Borders.LineStyle = <linienart>

Range("A1:B2").Borders.Color = <farbe>

Worksheets("Journal01").Cells(5, 3).Font.Size = 14 'schriftgrad

Worksheets("Journal02").Cells(5, 3).Font.Name ="Arial" 'schriftart

genausogut kannst du mit dieser notation zelleninhalte verschieben, kopieren, löschen, usw.

das objektmodell von excel kannst du im objektkatalog (drücke F2) ersehen.

s'Amstel

Archiv

Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.