Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zelleninhalte als Werte kopieren und dann... ?

Zelleninhalte als Werte kopieren und dann... ?
22.10.2006 13:19:19
Selma
Hallo Excelfreunde,
ich möchte aus AB "Vorlage" folgende Zelleninhalte B10:B13, C16, B19, B21, B23, B25 B38 ins AB "Abruf" (ist ausgeblendet) als Werte kopieren.
Danach möchte ich nur das Arbeitsbaltt "Abruf" speichern.
Speichern unter Dialog soll sich öffnen.
Wie mach ich das per VBA?
Vielen Dank im Voraus....
Liebe Grüße
SELMA
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalte als Werte kopieren und dann... ?
22.10.2006 16:08:54
Gerd
Hallo Selma,
probier mal.

Sub Values_Copy_Clear_Save()
With ThisWorkbook.Worksheets("Abruf")
.Range("B10: B13").Value = Worksheets("Vorlage").Range("B10:B13").Value
.Range("C16").Value = Worksheets("Vorlage").Range("C16").Value
.Range("B19").Value = Worksheets("Vorlage").Range("B19").Value
.Range("B21").Value = Worksheets("Vorlage").Range("B21").Value
.Range("B23").Value = Worksheets("Vorlage").Range("B23").Value
.Range("B25: B38").Value = Worksheets("Vorlage").Range("B25:B38").Value
End With
With ThisWorkbook.Worksheets("Vorlage")
.Range("B10: B13").ClearContents
.Range("C16").ClearContents
.Range("B19").ClearContents
.Range("B21").ClearContents
.Range("B23").ClearContents
.Range("B25: B38").ClearContents
End With
ThisWorkbook.Worksheets("Abruf").Copy
Application.Dialogs(xlDialogSaveWorkbook).Show
End Sub

Gruß
Gerd
Anzeige
AW: Zelleninhalte als Werte kopieren und dann... ?
22.10.2006 22:13:56
Selma
Vielen Dank Gerd !
LG
Selma
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige