Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
14.12.2017 15:27:54 |
Sebastian |
|
|
|
14.12.2017 16:08:37 |
Gast84540 |
|
|
|
14.12.2017 16:21:45 |
Werner |
|
|
|
14.12.2017 16:28:27 |
Gast68665 |
|
|
Offenes Excel-sheet aktivieren |
14.12.2017 16:42:02 |
Werner |
|
|
|
15.12.2017 10:21:06 |
Sebastian |
|
|
|
15.12.2017 10:25:19 |
Werner |
|
|
|
19.12.2017 09:30:07 |
Sebastian |
|
|
Von:
Werner |
Datum:
14.12.2017 16:42:02 |
Views:
676 |
Rating:
|
Antwort:
|
Thema:
Offenes Excel-sheet aktivieren |
Hallo Sebastian,
dann so:
Public Sub aaa()
Workbooks.Open Filename:="c:\Users\ABC\Desktop\Versuch1.xlsx"
'ActiveWorkbook ist das geöffnete Workbook
ActiveWorkbook.RefreshAll
'nach dem Öffnen ist die geöffnete Datei automatisch die aktive Datei
'somit wird hier das Blatt "Resources GER" der geöffneten Datei angesprochen
Worksheets("Resources GER").Range("A1:M200").Copy
'ThisWorkbook ist die Datei, in der dieses Makro steht
'somit wird so das Blatt "Resources" der Datei angesprochen über die
'das Makro gestartet wurde
'es werden nur die Werte übertragen
ThisWorkbook.Worksheets("Resources").Range("A2").PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
'Speichern und Schließen der geöffneten Datei
'du brauchst hier eigentlich nicht zu Speichern
'da du in der Datei ja nichts geändert hast
ActiveWorkbook.Close SaveChanges:=True
End Sub
Gruß Werner
|
- 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
|
|
14.12.2017 15:27:54 |
Sebastian |
|
|
|
14.12.2017 16:08:37 |
Gast84540 |
|
|
|
14.12.2017 16:21:45 |
Werner |
|
|
|
14.12.2017 16:28:27 |
Gast68665 |
|
|
Offenes Excel-sheet aktivieren |
14.12.2017 16:42:02 |
Werner |
|
|
|
15.12.2017 10:21:06 |
Sebastian |
|
|
|
15.12.2017 10:25:19 |
Werner |
|
|
|
19.12.2017 09:30:07 |
Sebastian |
|
|