|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 Nach Prüfung einer Zelle einen Zellbereich kopiere |
18.02.2008 12:10:00 |
Rudi |
|
|
|
18.02.2008 18:53:41 |
jh |
|
|
|
19.02.2008 11:02:10 |
Rudi |
|
|
|
19.02.2008 11:33:11 |
jh |
|
|
Von:
Rudi |
Datum:
18.02.2008 12:10:00 |
Views:
2210 |
Rating:
|
Antwort:
|
Thema:
Nach Prüfung einer Zelle einen Zellbereich kopiere |
Hallo Leute, bin blutiger Anfänger.
Folgendes Problem: Ich habe eine Tabelle, mit unbekannter Länge. Diese möchte ich nach Prüfung einer bestimmten Zelle zur Druckaufbereitung auf ein neues Tabellenblatt übertragen. Wenn ich eine einzelne Zelle übertage ist dies kein Problem. Aber einen Zellbreich fängt das Problem an. Natürlich wäre es gut, wenn die Fromatierung der Zelle erhalten bleiben würde. Dies wäre das nächste Problem.
Option Explicit
Dim i As Variant
Dim j As Variant
Sub Tabelle_aufbereiten()
If Worksheets("Jan 08").Cells(i + 10, 1).Value <> Empty Then
'Worksheets("t1").Cells(j + 1, 1) = Worksheets("Jan 08").Cells(i + 1, 1) Dies funktioniert!!
Worksheets("t1").Range(Cells(j + 1, 1), Cells(i + 39, 9)) = Worksheets("Jan 08").Range(Cells(j + 1, 1), Cells(i + 39, 9))
Else: Worksheets("t1").Cells(j + 9, 2) = "Kuckuck!!!"
End If
Danke im Voraus
und liebe Grüße Rudi |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Nach Prüfung einer Zelle einen Zellbereich kopiere |
18.02.2008 12:10:00 |
Rudi |
|
|
|
18.02.2008 18:53:41 |
jh |
|
|
|
19.02.2008 11:02:10 |
Rudi |
|
|
|
19.02.2008 11:33:11 |
jh |
|
|