Notifikationer

Markér alle som læst Log ud

dytti Novice

01. januar 2005 - 02:40 Der er 2 kommentarer og
1 løsning

Kombinere kontrolelementer vba

Her er et dobbelt spørgsmål.

1. Lad os antage at jeg har 6 ark i min projektmappe: ark1, ark2 osv.
på ark1 har jeg en combobox1 og en kommandoknap1. Comboboxen indeholder ark2, ark3 osv. op til ark6.
Kan det lade sig gøre at jeg i comboboxen markere f.eks. "ark4" og et klik på kommandoknappen så sletter alle ark undtaget ark1 og ark4.

2. Dernæst vil jeg gerne have endnu en kommandoknap2 som ved klik, laver en "Gem Som" "ark4"
Eller hvis jeg i comboboxen har valgt "ark5", så slettes alle ark på nær 1 og 5 ved klik på den første kommandoknap, og "Gem Som" "ark5" ved klik på den anden kommandoknap.

Hvis det kan lade sig gøre, hvordan vil koden så se ud på de enkelte elementer?

Synes godt om

bak Forsker

03. januar 2005 - 15:44 #1

Jeps
højreklik på ark1's arkfane
vælg "vis programkode"
indsæt disse koder
koden forudsætter at Ark1 ligger forrest og at du bruger knapper fra "Kontrolelementer" (ikke fra "Formular")

'denne sletter arkene undtaget den der er valgt og den ark koden ligger i.
Private Sub CommandButton1_Click()
For Each sh In ThisWorkbook.Sheets
If sh.Name <> ActiveSheet.Name And sh.Name <> ComboBox1.List(ComboBox1.ListIndex) Then
Application.DisplayAlerts = False
sh.Delete
Application.DisplayAlerts = True
End If
Next
End Sub

'denne gemmer som andet arks navn
Private Sub CommandButton2_Click()
ThisWorkbook.SaveAs ThisWorkbook.Path & "\" & Sheets(2).Name
End Sub

Synes godt om

dytti Novice

04. januar 2005 - 01:37 #2

Yes my boys!! det virkede skisme. Takker
Smider du et svar, så kommer der point.

Synes godt om

bak Forsker

04. januar 2005 - 08:24 #3

et svar :-)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Ændre tal i en celle Af xvid i Excel	1	04/09/202616:05	04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel	7	31/08/202610:24	04/09/202602:08
problem med mailbesked Af Pestilensen i Excel	3	24/08/202611:16	28/08/202612:55
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel	18	17/08/202615:14	05/09/202622:04
Gemme største værdi Af Lemming@privat.dk i Excel	2	07/08/202622:13	08/08/202609:03

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS