VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Bereich aus anderer Tabelle für 2 Sekunden anzeigen

Gruppe

Allgemein

Bereich

Ansicht

Thema

Bereich aus anderer Tabelle für 2 Sekunden anzeigen

Problem

Wie kann ich einen vorgegebenen Bereich aus einer zweiten Tabelle im aktiven Blatt für 2 Sekunden anzeigen lassen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




StandardModule: basMain

Sub Anzeige()
   Worksheets("Rang").Range("B2:M16").CopyPicture _
      Appearance:=xlScreen, Format:=xlBitmap
   With Worksheets("Tabelle1")
      .Paste Destination:=.Range("B2")
   End With
   Application.Wait Now + TimeSerial(0, 0, 2)
   ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Delete
End Sub
        

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Ansicht