Hej. Jeg har tildelt en variabel navnet på min Workbook. Nu er problemet at jeg på et tidspunkt i min kode skal aktivere denne Workbook. Jeg ved bare ikke hvordan, men jeg ved da at "Windows(MyWorkbookString).Activate" ikke virker.
I lang tid har samarbejdsbranchen fokuseret på at forbedre enhedsfunktioner – bedre kameraer, klarere lyd og smartere software. Men den virkelige forvandling handler ikke om funktioner.
Har du husket at slutte dit navn med ".xls" ?? Ellers prøv i stedet i starten af din kode med: Dim MyWorkbook as Workbook Set MyWorkbook = Workbooks("navn.xls") ... MyWorkbook.Activate
Undskyld ventetiden. Men jeg har følgende kode der ikke virker:
Dim MyWorkbook As Workbook Dim MyWorkbookString As String ... MyWorkbookString = MyWorkbookString & ".xls" ... Set MyWorkbook = MyWorkbookString '(virker ikke: Typerne passer ikke sammen) ... MyWorkbook.Activate
Har du nogen ideer til hvordan jeg kommer over dette problem ? (Eller er der andre der har det ...)
Ok - du misforstår mig (og en del fundamentale principper!) Prøv at indsætte det nedenstående:
Dim MyWorkbook As Workbook Dim MyWorkbookString As String ''... MyWorkbookString = MyWorkbookString & ".xls" ''... '''Her går det galt for dig: Du forsøger at sætte en workbook = en string! '''Set MyWorkbook = MyWorkbookString '(virker ikke: Typerne passer ikke sammen) ''' I stedet skal du bruge: Set MyWorkbook = Workbooks(MyWorkbookString) ''' HELD OG LYKKE MED DET :-) ''... MyWorkbook.Activate
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.