ich habe mal eine Frage: Ist es denn möglich über ein Makro die gesamte Tabelle 2 von Excel in Powerpoint zu exportieren? Wenn ja, habt ihr einen passenden Code hierfür?
Vielen Dank für eure Rückmeldungen und Vorschläge.
LG
Meike
Sub Button_G()
Application.ScreenUpdating = False
Dim bol_Sichtbar As Boolean
Dim chb As Checkbox, wksEingabe As Worksheet
bol_Sichtbar = Sheets("Eingabe").Range("I15").Value
With Sheets("Tabelle2")
.Unprotect Password:="pw"
.Rows("425:462").Hidden = Not bol_Sichtbar
If bol_Sichtbar = True Then
.Select
.Range("B425").Select
ActiveWindow.ScrollRow = 425
Else
.Range("B425,B426,B428").ClearContents
.Range("C441:D442").Select
ActiveCell.FormulaR1C1 = "test"
setze die Häkchen in den Symbolen für die Zeilen zurück 425:462
End If
.Protect Password:="pw", DrawingObjects:=True, Contents:=True, _
Scenarios:=True, AllowFormattingCells:=True
End With
Application.ScreenUpdating = True
End Sub
Ich hoffe, das ich meine Anliegen darstellen konnte und der Download diesmal entspannter ist.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen