Avatar billede fjeld Praktikant
05. maj 2015 - 21:16 Der er 1 kommentar

Makro til at skifte imellem filer

Hej alle,

Jeg mangler en makro kode, som "hopper" imellem to åbne Excel filer. 

Navnet på de to åbne Excel filer er ikke fast, og derfor kan jeg ikke bare ligge et fast navn ind. Det jeg forestiller mig er blot, at den "hopper" imellem den forrige Excel fil..

Kan dette lade sig gøre?

Pft.
Peter
Avatar billede natkatten Mester
05. maj 2015 - 21:35 #1
Hmm, hvad nu hvis, du har tre eller flere filer (workbooks) åbne?

Nåh, men denne burde fungere, hvis der kun er to åbne Excel-filer. Koden skal vel så lægges ind i begge de to filer.

Den bør udvides med fejlhåndtering mv.

Sub ÅbnAndenFil()
Dim wb As Workbook
Dim str As String
For Each wb In Workbooks
If wb.Name <> ThisWorkbook.Name Then str = wb.Name
Next wb
MsgBox "Den anden åbne Excel-fil er: " & str & "." & vbCrLf & _
"Klik på OK for at aktivere den."
Workbooks(str).Activate
End Sub
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester