CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

[VBA Excel] Variable dans nom TextBox

Ion_Negatif
Ion_Negatif
Niveau 10
22 janvier 2010 à 11:17:04

Bonjour à tous :)

Voila je fais une petite appli sous Excel avec du VBA, pour gerer des données, et j'ai un formulaire avec 21 textbox, nommés respectivement TextBox1 à textBox21. Lorsque je click sur un bouton, je veux d'abord vérifier qu'aucun champs obligatoire n'a été laissé vide. j'ai donc fait ce petit code :

Private Sub CommandButton1_Click()
Dim i As Integer
Dim test As Integer
test = "0"
For i = 1 To 21
If ("TextBox" & i).Value = "" Then
test = "1"
End If
Next i
If test = "1" Then
MsgBox "Tout les champs obligatoires ne sont pas correctement remplis", vbExclamation
End If

Je pensais que ("TextBox" & i).Value donnerait TextBox1.value par exemple (dependant de la valeur de i), mais au lieu de ça j'ai une erreur de compilation, le . entre les parenthèses et Value est surligné, et j'ai le message "Attendu : Then ou Go To"

J'ai donc cherché sur google comment utiliser une variable dans un nom de textbox (ou d'un autre élément), mais je n'ai rien trouvé :-( En gros en php j'avais toujours fait par exemple ${$nomvariable} = ...., et la j'aimerais faire pareil :)

(je précise que j'ai aussi pensé a mettre "TextBox1" dans une variable, et a utiliser cettevariable.value, mais la encore je n'y arrive pas :-( )

Donc merci a qui peut m'aider :)

(ps : tant qu'on y est, si vous avez l'adresse d'un tuto complet sur le VBA (appliqué a Excel et Access), et qui part des bases (un peu comme sur le siteduzero), je suis preneur aussi ^^)

_skip
_skip
Niveau 10
22 janvier 2010 à 11:31:59

Voici 2 ou 3 trucs qui peuvent t'aider à retrouver le controle par son nom :

http://www.access-programmers.co.uk/forums/showthread.php?t=55424

Moi je peux pas t'aider j'y connais pas large en VBA.

Ion_Negatif
Ion_Negatif
Niveau 10
22 janvier 2010 à 11:39:42

Originally posted by dcx693

to use the variable str1 which contains the name of the text box:
Me(str1)="Text to go in Text box"

Ca fonctionne :fete: :-d

Merci pour le lien ^^

Sous forums
  • Aide à l'achat Mac
  • Création de Jeux
  • Linux
  • Programmation
  • Création de sites web
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware
La vidéo du moment