Avatar billede familienriis Nybegynder
09. april 2007 - 22:03 Der er 3 kommentarer og
1 løsning

Samme genvejstast til forskellige makroer efter hv. ark er aktiv

JEg har mange ark som på hvert ark en knap med følgende kode

Private Sub ToggleButton1_Click()
call makronrXX
end sub

koden call "makroXX" er forskellig på hvert enkelt ark, da det er vidt forskellige makroer der køres på de enkelte ark.

Jeg kunne godt tænke mig at man kunne lave en "universal" genvejstast til en makro på de enkelte faner

Når jeg har markeret fanen "FOR" skal CTRL+D trigge den makro der hedder "makrofor"

Når jeg har markeret fanen "IND" skal CTRL+D trigge den makro der hedder "makroind"

osv.

Grunden til at jeg vil have den samme genvejs tast på alle arkene selvom det er forskellige makroer der skal køres er at de enkelte makroer laver slags udskrift på det enkelte ark. (slutresultatet er det samme, men der er forskellige beregninger i makrtoen bagved)

Jeg tænker at man kunne lave en makro når man aktiverer det enkelte ark
Sheets("FOR").Activate  .........

Men aner ikke om det kan lade sig gøre
Avatar billede familienriis Nybegynder
09. april 2007 - 22:05 #1
det jeg ønsker er altså at det skal være det enkelte ark der bestemmer præsis hvad CTRL + D skal gøre.
Avatar billede kabbak Professor
09. april 2007 - 22:43 #2
Du laver en makro, som denne, den tjekker hvilket ark der er aktiv.
Sæt selv CTRL+d på som genvej.


Sub Universal()
Select Case ActiveSheet.Name
  Case "IND"
  MakroInd ' makroen for arket Ind
  ' eller skriv koden her for arket
  Case "FOR"
  ' o.s.v.
  Case "RES"
 
  End Select
 
End Sub
Avatar billede familienriis Nybegynder
14. april 2007 - 12:59 #3
den virker lige efer hensigten.
Jeg takker mange gange for hjælpen

Får jeg lige et svar :0)
Avatar billede kabbak Professor
15. april 2007 - 09:29 #4
et svar ;-))
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
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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