Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Standardbereich in anderes Tabellenblatt an erster leeren Zelle einfügen |
01.09.2014 10:01:50 |
AvW |
|
|
|
01.09.2014 11:56:12 |
Gast6050 |
|
|
|
01.09.2014 12:02:36 |
Gast16849 |
|
|
|
01.09.2014 14:07:48 |
Gast68267 |
|
|
Von:
AvW |
Datum:
01.09.2014 10:01:50 |
Views:
1633 |
Rating:
|
Antwort:
|
Thema:
Standardbereich in anderes Tabellenblatt an erster leeren Zelle einfügen |
Hallo zusammen,
ich bin Vba Neuling und dabei ein Projekt Planungs Tool zu basteln.
Verschiedene Abteilungen können hier den Status ihres Projektes eintragen.
Um neue Projekte anzulegen soll über einen Button an der erstgefundenen leeren Zeile Standardzeilen, welche in einem separaten Tabellenblatt abgespeichert sind eingefügt werden.
Leider wird mit meiner Vorgehensweise der Bereich immer an der Stelle eingefügt, an der sich gerade der Cursor (angeklickte Zelle) befindet und nicht an der mit der Schleife vorher ermittelten leeren Zeile.
Hier meine Vorgehensweise:
Sub Neues_Projekt()
'leere Standardzeilen kopieren aus anderem Tabellenblatt
Sheets("Layout").Select
Range("A1:IF6").Select
Selection.Copy
'kopierten Bereich einfügen in anderes Tabellenblatt an erster leeren Zeile
Sheets("Project Planning Tool").Select
Dim Zeile As Integer
Dim Einfügen As Integer
Zeile = 181
Do While (Cells(Zeile, 1) <> "")
Zeile = Zeile + 1
Loop
End Sub
|
- 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
|
Standardbereich in anderes Tabellenblatt an erster leeren Zelle einfügen |
01.09.2014 10:01:50 |
AvW |
|
|
|
01.09.2014 11:56:12 |
Gast6050 |
|
|
|
01.09.2014 12:02:36 |
Gast16849 |
|
|
|
01.09.2014 14:07:48 |
Gast68267 |
|
|