Avatar billede Blitzher Nybegynder
23. december 2014 - 17:48 Der er 5 kommentarer og
1 løsning

Endnu mere VBA

Først og fremmest glædelig jul.

Jeg sidder og mosler med noget VBA, og et simpelt problem kommer flere gange til mig.

Hvis jeg er ved at lave en macro i et sheet, og lukker dette sheet (går ud fra jeg har gemt macroen)

Så ønsker at load den macro jeg lige har lavet, kan jeg ikke finde den.

Får eks. hele tiden denne besked
//Pas på! Dele a dokumentet kan indeholde personlige oplysninger, som ikke kan fjernes af Dokumentinspektion.

//Følgende kan ikke gemmes i projekmapper uden makroer. VB projekt.

Jeg kan ikke få det til at virke optimalt, ved blot at skrive en macro, og derefter gemme den i en evt. folder.

Hvordan gør jeg dette.
Avatar billede store-morten Ekspert
23. december 2014 - 18:11 #1
Når du gemmer din Excel-fil skal du ændre filtypen.

Lige under Navn: Mappe1
Filtypen er standard: Excel-projektmappe
Denne ændres til: Excel-projektmappe med aktive makroer
Inden du gemmer Excel-filen
Avatar billede Blitzher Nybegynder
23. december 2014 - 19:13 #2
Nu har jeg eks. lavet en macro, som jeg gerne vil kunne bruge i et andet dokument.

Igennem VBA har jeg lavet en Function, men hvordan gemmer jeg det så?

Altså så jeg bare kan trykke "save"...

Så jeg kan bruge den igen?
Avatar billede store-morten Ekspert
23. december 2014 - 19:36 #3
Det nemmeste er at gemme i det dokument, hvor den skal bruges.
Avatar billede store-morten Ekspert
23. december 2014 - 19:49 #4
Det er dog mulig at gemme i en "Personlig" mappe, så virken den i alle Excel filer, der åbnes på den pc. den "Personlig" mappe er gemt på.
Avatar billede Blitzher Nybegynder
23. december 2014 - 21:58 #5
okay - vil du ikke være rar at sende en svar mulighed, så får du point.

Jeg har også et sidste spørgsmål.

------
Sub XMsgBox()
X = Cells(1, 3).Value
    If X > 3 Then
        MsgBox " X er større end 3"
    Else
        MsgBox "X er mindre end 3"
    End If

End Sub
-----
Jeg har en Macro sm ser således ud.

Hvis jeg nu ønsker at ændre Cell(1,3) til der hvor min mussemarkør er, hvad skal man så udskifte det tal med??

Samt, hvis jeg ønsker at lave en knappe i et sheet med denne funktion???

Hvorledes skal det programmeres?
Avatar billede store-morten Ekspert
23. december 2014 - 22:20 #6
Sub XMsgBox()

X = ActiveCell.Value
    If X > 3 Then
        MsgBox " X er større end 3"
    Else
        MsgBox "X er mindre end 3"
    End If

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
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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



IT-JOB

Udviklings- og Forenklingsstyrelsen

Scrum Master

Udviklings- og Forenklingsstyrelsen

Projektledere til nyetableret PMO-kontor

Udviklings- og Forenklingsstyrelsen

Generalist med flair for økonomi i projekter og drift

SporingsGruppen ApS

Frontend-udvikler