Avatar billede krogsager Nybegynder
11. september 2004 - 22:28 Der er 21 kommentarer og
1 løsning

FullScreen i Excel 2000 virker kun på min egen laptop

Jeg har lavet en macro som skal lave Full Screen, dvs. gemme ark-faner og værktøjsbjælker. Ser sådan her ud:

Sub FullScreen()
'
' FullScreen Macro
' Macro recorded 02-09-2004
'

'
    Application.DisplayFullScreen = True
End Sub

Den virker perfekt på min laptop, men når mine kollegaer skal bruge den, virker det ikke! Det mest underlige er at, det virker "forskelligt-forkert" på de andres PC'ere. Hos nogle fjerner den ark-faner, men ikke værktøjslinier. Hos andre omvendt.
Meget, meget mærkeligt???

Alle bruger Excel 2000, med samme service pack (3) installeret.

Hjælp modtages meget gerne.
Avatar billede jkrons Professor
11. september 2004 - 22:45 #1
Hvad sker de på dine kollegers maskiner, hvis de selv slår Full Screen til manuelt?
Avatar billede krogsager Nybegynder
11. september 2004 - 22:47 #2
Godt spørgsmål, lige fem minutter :-)
Avatar billede krogsager Nybegynder
11. september 2004 - 22:52 #3
Ekstra mærkeligt. Har lige checket en enkelt pc, og den gør det samme, altså macro og >view >Full Screen gør det samme!
Kan der være forskel i f.eks. Options der gør det?
Avatar billede jkrons Professor
11. september 2004 - 22:54 #4
Jeg må tilstå, at jeg ikke umiddelbart kender en indstilling, der skulle kunne bevirke dette, men prøv at sammenligne Vis fanebladet på to pc'er, der opfører sig forskelligt.
Avatar billede krogsager Nybegynder
11. september 2004 - 22:57 #5
De to som jeg kan sammeligne lige nu (som opfører sig forskelligt)har begge checket af i fanebladet.
Avatar billede jkrons Professor
11. september 2004 - 23:04 #6
OK, her er en måde at få genskabt dit problem på. Måske kan det være en løsning at gøre det samme men i modsat rækkefølge:

Tag din egen pc. Slå fuldskærmvisning til. Nu skulle alt vøære væk, bortsetfra menuen. Vælg så Vis - Værktøjslinier, og vælg en af dem, fx. Standard. Nu vises den. Slå Fuldskærm fra igen. Nu kommer det hele frem. Slå så fuldskærmsvisning til igen. Nu bliver den værktøjslinie du valgte før fremme.

Prøv (på en af de "syge" pc'er) at Slå fuldskærmsvisning til og så fjerne værktøjslinierne, slå fuldskærmsvisning fra og til igen. Løser det problemet?
Avatar billede jkrons Professor
11. september 2004 - 23:09 #7
En anden mulighed er at prøve at slå FULLSCREEN til på en af de "syge", og så se om denne makro fjerner fanerne :

Sub FjernFaner
    ActiveWindow.DisplayWorkbookTabs = False
End Sub
Avatar billede krogsager Nybegynder
11. september 2004 - 23:14 #8
>jkrons
So far har jeg (vi) lært at FullScreen går mellem to tilstande, og ikke nøvendigvis fra "normal" visning til reel FullScreen.
Jævnfør din kommentar 23:04:14

Checker lige med macro'en
Avatar billede jkrons Professor
11. september 2004 - 23:16 #9
Præcis. Spørgsmålet er så, hvordan tilstanden kan opstå.
Avatar billede krogsager Nybegynder
11. september 2004 - 23:21 #10
Så har vi problemet løst med fanerne, vha. macro'en:-) Spørgsmålet er så bare, om vi ved hjælp af en makro, kan skabe samme tilstand for værktøjslinierne før der vælges FullScreen??
Avatar billede jkrons Professor
11. september 2004 - 23:25 #11
Det er nemt at fjerne dem. Til gengæld er du nødt til huske hvilke der var fremme, da det ikke er nok at gå ud af Fuld Skærm for at få dem frem igen.

For Each CB In CommandBars
    If CB.Type = msoBarTypeNormal Then
          CB.Visible = False
    End If
Next CB
Avatar billede krogsager Nybegynder
11. september 2004 - 23:33 #12
Ja, det bliver jo selvfølgelig et problem :/
Den workbook jeg har skal sendes til 200 personer i 72 lande, så jeg får jo nok på hatten hvis jeg ikke kan genskabe toolbars...
Har du en go' idé?

Kan jeg med den ovenstående makro (med "true"), vælge feks. standard og formatering?
Avatar billede jkrons Professor
11. september 2004 - 23:50 #13
Lad mig lige bruge to sekunder...
Avatar billede jkrons Professor
11. september 2004 - 23:59 #14
Hvis du bruger denne makro til at slå FullScreen til med:

Sub MyFullScreenOn()

    Application.ScreenUpdating = False
    For Each cB In CommandBars
        If cB.Type = msoBarTypeNormal Then
          cB.Visible = False
        End If
    Next cB
    ActiveWindow.DisplayWorkbookTabs = False
    Application.DisplayFullScreen = True
    Application.CommandBars("Full Screen").Visible = False
  Application.ScreenUpdating = True
 
End Sub

Og denne til at slå det fra igen

Sub MyFullScreenOff()

  Application.ScreenUpdating = False
  Application.DisplayFullScreen = False
  ActiveWindow.DisplayWorkbookTabs = True
  Application.CommandBars("Standard").Visible = True
  Application.CommandBars("Formatting").Visible = True
  Application.ScreenUpdating = True
 
End Sub

skulle du vidst være nogenlunde garderet.
Avatar billede krogsager Nybegynder
12. september 2004 - 00:04 #15
Det virker perfekt :-)
Mange tak for hjælpen!

Lige et lille spørgsmål vedr. nakro'en, (for at lære lidt) hvorfor bruger du  Application.ScreenUpdating = False / True ?
Avatar billede jkrons Professor
12. september 2004 - 00:06 #16
Tak for point. Det er primært i den første makro, den er interessant. Hvis der er vist mange værktøjslinier, kan skærmen komme til atstå og "flimre" mens de bliver slået fra. Det undgås ved at fjerne screenupdating.
Avatar billede krogsager Nybegynder
12. september 2004 - 00:08 #17
OK! Igen, mange tak for hjælpen.
Avatar billede jkrons Professor
12. september 2004 - 00:10 #18
Velbekomme.
Avatar billede brynil Nybegynder
12. september 2004 - 00:15 #19
Et mindre problem, men så vidt jeg kan se gør det at alle får den samme opsætning når der resettes. Ellers skal de gamle indstillinger gemmes og hentes ind igen  ;-)
Avatar billede jkrons Professor
12. september 2004 - 00:19 #20
brynil-> Du har fuldsætndigt ret. Problemet er, at man nok godt kan håndtere at huske værktøjslinierne, men da man ikke ved, hvorfor arkfanerne af og til skjules, og man ikke på forhånd ved, hvilket problem en konkret pc har, altså om værktøjslinier eller arkfaner vises/skjules), er det svært at gøre andet.
Avatar billede krogsager Nybegynder
12. september 2004 - 00:24 #21
Ja korrekt, men ved at gi' dem Standard og Formatering "tilbage", er det fint i dette her tilfælde.
Har en forventning om et vis kendskab til Excel, hos de der skal bruge dette ;-)
Avatar billede brynil Nybegynder
12. september 2004 - 00:25 #22
Helt enig, jkrons! Men det er nok rart at være forberedt på 'det ligner ikke det jeg plejer at bruge' spørgsmålet. Det plejer at være så sikkert som Amen i kirken.
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