Microsoft Excel

Herbers Excel/VBA-Archiv

Werte und Format Kopieren

Betrifft: Werte und Format Kopieren von: Heiko
Geschrieben am: 05.10.2014 08:23:58

Hallo
ich da einen Code mit dem ich Daten in eine andere Tabelle kopiere. Jetzt werden aber auch die Formeln mitkopiert. Kann mir jemand sagen wie ich den Code so umstellen kann das nur die Werte und das Format kopiert werden?

mfg Heiko

Sub Copy_EK_Preis_Click()
Range("A3").Select
[A3:A144].Copy Tabelle2.[A3]
[B3:B144].Copy Tabelle2.[B3]
[C3:C144].Copy Tabelle2.[C3]
[G3:G144].Copy Tabelle2.[D3]
End Sub

  

Betrifft: AW: Werte und Format Kopieren von: Crazy Tom
Geschrieben am: 05.10.2014 09:15:13

Hallo Heiko

2 Fragen unter Deiner geht es ums gleiche Thema

MfG Tom


  

Betrifft: AW: Werte und Format Kopieren von: Heiko
Geschrieben am: 05.10.2014 09:20:16

Hi
mit dem code komm ich aber nicht so klar. Ich hab nämlich nicht so den Plan.

mfg Heiko


  

Betrifft: AW: Werte und Format Kopieren von: Crazy Tom
Geschrieben am: 05.10.2014 09:26:15

Hallo Heiko

das würde bei Dir dann so aussehen

Option Explicit

Sub Copy_EK_Preis_Click()
    Range("A3:C144").Copy
    With Worksheets("Tabelle2").Range("A3")
        .PasteSpecial xlPasteValues
        .PasteSpecial xlPasteFormats
    End With
    Range("G3:G144").Copy
    With Worksheets("Tabelle2").Range("D3")
        .PasteSpecial xlPasteValues
        .PasteSpecial xlPasteFormats
    End With
    Application.CutCopyMode = False
End Sub

und Du solltest bei der Zellenangabe auf die eckigen Klammern verzichten

MfG Tom


  

Betrifft: Alternative von: Erich G.
Geschrieben am: 05.10.2014 09:47:34

Hi zusammen,
etwas kürzer ginge das wohl auch so:

Option Explicit

Sub Copy_EK_Preis_Click()
    With Worksheets("Tabelle2")
      Range("A3:C144").Copy
      .Range("A3").PasteSpecial xlPasteValuesAndNumberFormats
      Range("G3:G144").Copy
      .Range("D3").PasteSpecial xlPasteValuesAndNumberFormats
      Application.CutCopyMode = False
    End With
End Sub
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich und: Schönen Rest-Sonntag!


 

Beiträge aus den Excel-Beispielen zum Thema "Werte und Format Kopieren"