22. november 2000 - 17:17Der er
4 kommentarer og 1 løsning
Ændre baggrundsfarve i kontrolelementer
Hej Jeg har en formular med evt 10 felter, formularen er skrivebeskyttet ved åbning, og alle kontrolelementer har en grå baggrundsfrave, når jeg klkker på rediger fjernes skrivebeskyttelsen fra formularen, alt dette virker perfekt. mit spørgsmål er:
kan der laves en kode til knappen \"rediger\" der skifter baggrundsfarven i alle kontrolelementer til hvid på en gang, det kan sagtens virke, hvis man definere hvert enkelt kontrolelemet af gangen, men dette er lidt trælst arbejde når der er mange kontrolelementer i formularen, ideen er at når man så klikker på knappen gem skiftes baggrundsfarven så til grå igen i alle kontrolelementer.
De fleste virksomheder har efterhånden bevist, at AI virker.
Pilotprojekter leverer resultater. Medarbejdere bruger generative AI-værktøjer. Nye use cases dukker op på tværs af organisationen.
Vil du skrivebeskytte felterne, eller blot ændre baggrundsfarven?
Hvis du ønsker, at ændre baggrundsfarven på en gruppe af f.eks. tekstbokse hvis navn alle starte med \"txt\" kan du bruge flg. kode.
--- Kode start --- Private Sub btChangeColor_Click() Dim txtBoks As Control
For Each txtBoks In Me If (TypeName(txtBoks) = \"TextBox\") And (Left(txtBoks.Name, 3) = \"txt\") Then txtBoks.BackColor = 243 End If Next End Sub --- Kode slut ---
Du kan selv ændre objekttype og/eller hvilket navn der skal filtreres efter.
Hej Tak for indlæggende, der er fdata\'s svar der var det mest optimale,så derfpr point til fdata, det virker fint tak for hjælpen point er på vej. Også tak til lkp, jeg er sikker på at dit foreslag kan bruges i en anden sammenhæng
*SSS* aandersen
Synes godt om
Ny brugerNybegynder
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.
