PNG32 PNG32 PNG32 PNG32
PNG32
Forum Excel, VBA, VSTO, Exceltips, Excelhj�lp PNG32 drivs av Excelspecialisten    Logga in     English
PNG32
PNG32 PNG32
PNG32

Logga in

PNG32

Du är inte inloggad. Logga in eller registrera dig för att skriva inlägg eller svara på inlägg.

För frågor om forumet, kontakta oss på webmaster@excelforum.se

PNG32 PNG32
PNG32 PNG32
PNG32

Excelforum

PNG32

 
ForumForumDiskussionerDiskussionerVBAVBASpara undan variablerSpara undan variabler
Föregående Föregående
 
Nästa Nästa
Nytt inlägg
 2009-01-16 09:02
 

Hej,

Hur gör man lättast om man vill att värdet i en variabel ska ligga kvar nästa gång man öppnar filen.

Jag har en mall som jag utgår i från och gör en spara som på och det är den filen (sparade) som jag vill att värdet i variabeln ska ligga kvar i.

Förstått så långt att man kan lägga in värdet i en cell som man sedan ropar efter nästa gång man öppnar filen, men hur?

Tacksam för svar.

Håkan

Nytt inlägg
 2009-01-16 11:47
 

Hej,

Jag brukar anväda arbetsbokens CustomDocumentProperties vilka sparas till nästa gång du öppnar arbetsboken. Du kan själv skapa sådana under Arkiv -> Egenskaper -> Anpassade. Säg att du skapar en CustomdocumentProperty som heter SAVED_PROPERTY så kan du skriva eller hämta värden från den genom följande kod:

Public Sub Test()

Dim str As String

ThisWorkbook.CustomDocumentProperties("SAVED_PROPERTY")  = "Test"          'Skriva till

str = ThisWorkbook.CustomDocumentProperties("SAVED_PROPERTY")                 'Hämta värde

End Sub

/Oskar

 

 


Oskar Folkesson

Excelforum drivs av Excelspecialisten som bedriver utveckling av program, utbildning samt support och hjälp i Excel och VBA.

www.excelspecialisten.se

Nytt inlägg
 2009-01-16 13:55
 

Oskars förslag fungerar bra, men Håkans fråga var hur man skriver och läser från/till en cell, så det kan vara bra att reda ut det också. Har man till exempel många värden där antalet varierar kan det också vara smidigare att göra det i ranger istället.

Det gör man genom en väldigt snarlik kod: 

Public Sub Test()
    Dim str As String
    Worksheets("Blad1").Range("A5")  = "Test"
    str = Worksheets("Blad1").Range("A5")
End Sub

Worksheets("Blad1"), kan istället bytas ut till Worksheets1 osv. (det man ser i VBA-editorn), och Range("A5") kan bytas ut till namngivna celler, etc.

För att värdet ska sparas måste man förstås spara själva arbetsboken också, vilket man gör med ThisWorkbook.Save.


Excelspecialisten

Excelforum drivs av Excelspecialisten som bedriver utveckling av program, utbildning samt support och hjälp i Excel och VBA.

www.excelspecialisten.se

Nytt inlägg
 2009-01-16 14:56
 

Först måste jag tacka för de snabba svaren.

Av svaren att dömma får det nog bli Specialistens lösning jag går på då det gäller flera variabler.

Tack än en gång.

 

Håkan

Föregående Föregående
 
Nästa Nästa
ForumForumDiskussionerDiskussionerVBAVBASpara undan variablerSpara undan variabler

PNG32 PNG32
Excelforum drivs av Excelspecialisten som bedriver utbildning i Excel och VBA, tillhandahåller support och hjälp med Excel, utvecklar program i Excel. Är ni i behov av en konsult inom Excel, VBA eller VSTO, eller söker en excelkurs, kontakta oss.
Copyright 2013 ExcelSpecialisten XLS AB   Användarvillkor  Personliga uppgifter