07. marts 2003 - 23:42Der er
26 kommentarer og 2 løsninger
Tekst ind i kombinationsbox i Powerpoint
Hej eksperter, jeg har oprettet et par kombinationsbokse i et powerpointslideshow. Jeg kunne godt tænke mig, at proppe lidt tekst ind på listerne, så man kan vise nogle valgmuligheder. Hvordan får man tekst ind i kombinationsboksen? Det skal ikke have nogen funktion overhovedet, kun til et demo eksempel.
Den eneste måde jeg kan få tekst ind i en kombinationsboks på, er at højreklikke på boksen vælge combibox - edit. Nu kan jeg inskrive tekst, men jeg kan ikke få den til at lave linjeskift. Er ikke noget jeg har prøvet før lige nu, men det kan være at du kan bruge svaret alligevel.
Hmmm.. den kunne jeg kun lure programmeringsmæssigt:
Tilføj en autostart macro til sliden (dobbeltklik evt. på comboboxen - så havner du det rigtige sted - du skal blot forlade ComboBox_Change() funktionen).
Tilføj
Private Sub AutoStart() ComboBox1.Clear ComboBox1.Width = 100 ComboBox1.AddItem ("Item 1") ComboBox1.AddItem ("Item 2") ComboBox1.AddItem ("Item 3") ComboBox1.ListIndex = 0 ' 0 indekseret item array - dvs. første element er nr. 0 End Sub
Autostart makroen kaldes automatisk ved start clearer listen og sætter bredden (ellers sker der "grimme" ting på skærmen, hvis den er for smal, og skal vise elementer der er bredere). Herefter tilføjes elementerne og sidst vælges hvilket element, der skal være valgt som standard.
Kan du ikke lige forklare hvordan jeg laver den der autostart inde i VB? Jeg er med på, hvordan jeg når til ComboBox_Change() funktionen, men skal jeg så indsætte et nyt modul, eller hur?
Gå til før eller efter Sub dvs. du flytter simpelt hen cursoren til før Privat eller efter Sub (tast enter et par gange og kopier mit "eksempel" ind og tilføj/ret som det passer dig. Du skal evt. sikre sig at din ComboBox hedder ComboBox1 - ellers ret objektnavnet til det korrekte.
Private Sub AutoStart() ComboBox1.Clear ComboBox1.Width = 100 ComboBox1.AddItem ("Item 1") ComboBox1.AddItem ("Item 2") ComboBox1.AddItem ("Item 3") ComboBox1.ListIndex = 0 ' 0 indekseret item array - dvs. første element er nr. 0 End Sub
I min står der kun gulerødder og jeg kan ikke se eller tilføje yderligere?
Synes godt om
Slettet bruger
08. marts 2003 - 01:13#17
Når du står i selve slidet, kan du kun se gulerødder. det virker først, når ud kører showet. Når du har installeret addinen, skulle du kunne gå i menuen Edit, og nederst vælge VBA Controls og så Edit Combobox contens. (men det er når du står i slidet. Kan du ikke det, ved jeg ikke hvad der er i vejen hos dig.
Ingen af dem virker desværre. der må være noget galt hos mig. Jeg har sat sikkerhed til det laveste, er der andre indstillinger??
Synes godt om
Slettet bruger
08. marts 2003 - 01:18#19
Har lige åbnet den slide jeg sendte til dig, jeg har også kun gulerødder. Har nu lukket og genåbnet originalen, og nu virker det heller ikke mere. Jeg er bange for, at den lille addin kun er en smagsprøve så man skal købe. Surt.
Hmmm... tror jeg lavede en fejl her.. AutoStart bliver ikke kaldt. Du kan manuelt kalde den ved at trykke F5 i VB Script Editoren. ComboBoxen beholder tilsyneladende ikke indstillingerne efter lukning af filen :-(
Ser lige om jeg kan finde noget mere om autostart af macro
=> JP, JA det er rigtigt. Det ser ud til at virke. Det er ikke det store problem for mig at køre den manuelt. Jeg har også en knap som egentlig bare er med for udseendet's skyld - den kan jeg vel bare tilknytte makroen til?
Ja, det er absolut det nemmeste at klikke på en knap :-)
Synes godt om
Slettet bruger
08. marts 2003 - 02:08#23
Jeg fik dette til at virke jeg lagde macroen direkte i slide1. har haft gemt og genåbnet, og værdierne bliver der.
Private Sub ComboBox1_DropButtonClick() ComboBox1.Clear ComboBox1.Width = 100 ComboBox1.AddItem ("Item 1") ComboBox1.AddItem ("Item 2") ComboBox1.AddItem ("Item 3") ComboBox1.ListIndex = 0 ' 0 indekseret item array - dvs. første element er nr. 0 End Sub
Synes godt om
Slettet bruger
08. marts 2003 - 02:09#24
Godnat. Det har været nogle lærerige timer. ;-)
Synes godt om
Slettet bruger
08. marts 2003 - 02:16#25
Glem det, var sikkert for træt, så ikke, at indholdet ikke skifted. :((
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.