19. juni 2004 - 14:18Der er
7 kommentarer og 2 løsninger
Access skal gennem vba tjekke en excel appl.
Hej eksperter
Når der trykkes på en knap i min access applikation ryger brugeren over i et defineret excelark. Dette excelark har mange worksheets. Via en parameter i knappen findes det rigtige worksheet til brugeren. Skulle dette ark ikke eksistere skal der oprettes et nyt worksheet med parameterens navn. At få brugeren over i excel, oprette et nyt worksheet og navngive det er ikke problemet. Problemet er for mig hvordan tjekker jeg om det efterspurgte worksheet er eksisterende?
lidt psudo over dette er noget i stil med: "if not existing then insert new worksheet"
Så i bund og grund tror jeg "bare" det er denne psudo der skal "oversættes".
Hvis det er af relevant info. så vides det ikke hvor mange worksheets der er da det hele tiden kan udvides.
Håber i forstår mit spørgsmål eller spørger i bare så svarer jeg efter bedste evne. På forhånd tak
Sub DoesSheetExist()' Get the worksheet you are looking for to appear Dim wSheet As Worksheet
On Error Resume Next Set wSheet = Sheets(ComboBox1.Text) If wSheet Is Nothing Then 'Does not exist Set wSheet = Nothing On Error GoTo 0 Else 'Exist wSheet.Activate ' open the right worksheet Set wSheet = Nothing On Error GoTo 0 End If End Sub
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.
