Version anglaiseVersion espagnoleVersion françaiseInscrivez-vous, c'est gratuit ! (mot de passe oublié)
- Samedi 26 juillet 2008 - 13:49:30
- inscrits : 890279
- connectés : 30759
- questions/jour : 4057
- Taux de réponse : 84.77%
Access 2007, aide,code vba Access code vba copier la valeur d'un champs d'un enregistrement Access code vba doublons Arrêt code vba Cherche code vba excel imprimer papier en-tete Code vba compacter base de donnée access 2007 Code vba de recherche de valeur dans une feuille excel Code vba enregistrer page html vers excel Code vba generateur de mot de passe Code vba ouvrir un fichier excel Code vba pour la mise en forme conditionnelle Code vba recherche Code vbag Convertir xls en txt code vba Creer copie de feuille excel code vba Créer commandbutton code vba excel vba Effacer le code vba Excel code vba Rapidite code vba Remove the combobox code vba Sortir code vba Supprimer code vba via boutton Symbole tabulation dans code vba Syntaxe requete sql dans code vba Table en code vba Téléchargement code vba excel comboboxPlus
Ils ont besoin de votre aide
- 13:49 Problème de publicité (Internet)
- 13:48 configuration entre outlook et mozilla (Messagerie/Chat)
- 13:48 Enregistrement de nero coverdesign (Windows)
- 13:48 peut on enlever le logo ou lécriture ? (Téléphonie/PDA/GPS)
- 13:47 xbox360 (Jeux vidéos)
- 13:45 probleme de chargement map css et 1.6 (Jeux vidéos)
Liste des forumsAidez-lesStatistiquesRechercherCharte
Plateformes d'assistanceDiscussions & Opinions des Communautés
|
|
|
|
Bonjour à tous, j'espère que quelqu'un pourra m'aider car la je galère...
J'ai marqué comme code vba:
Private Sub Userform_Initialize()
Dim Plus As String
LblRaison.Caption= "Raison Sociale" & Chr(10) & Sheets("bd").Range("A" & Lig).Value
et ça ne fonctionne pas ça m'affiche erreur d'éxécution 1004: erreur définie par l'application ou par l'objet
Je ne comprends pas où est mon erreur.
Merci d'avance pour votre aide
J'ai marqué comme code vba:
Private Sub Userform_Initialize()
Dim Plus As String
LblRaison.Caption= "Raison Sociale" & Chr(10) & Sheets("bd").Range("A" & Lig).Value
et ça ne fonctionne pas ça m'affiche erreur d'éxécution 1004: erreur définie par l'application ou par l'objet
Je ne comprends pas où est mon erreur.
Merci d'avance pour votre aide
Bonjour fabieg,
Est-ce que : LblRaison.Caption= "Raison Sociale" & Chr(10) & Sheets("bd").Range("A").Value & Lig ne marcherait pas mieux ?
|
bah le pb c'est que je peux pas sélectionner simplement une cellule car en fait ça dépend de la sélection qui a été faite sur un autre userform. Je m'explique dans mon usfnew on choisit une raison sociale parmi les choix qui proviennent de ma colonne A de mon fichier et le résultat doit s'afficher dans mon userform affichage et donc dans LblRaison |
Hello,
Bon, excuse-moi, j'ai répondu à côté. Je me suis fait un form. Ce que tu as écrit au début fonctionne, à condition que Lig soit défini. Ce n'est sans doute pas le cas... Ajx.
|
mais je fais comment pour le définir? |
Fabieg,
Je suppose que dans ta feuille "bd", en colonne A, tu as des "Raisons sociales", et que tu veux faire apparaître dans ton label, à l'initialisation de ton formulaire, celle qui se trouve en ligne n° <c'est toi qui le sait>. "Lig" doit avoir la valeur de la ligne correspondante. Il faudrait en savoir davantage sur ton fichier et ce que tu veux obtenir pour voir comment paramétrer ça. Ajx.
|
;-)
Tu crées un module, que tu nommes "Variables" ou "Définitions" pour plus de lisibilité... Dans ce module tu crée une variable : Public Lig As QuelqueChoseQuiCorrespondAuContenu Ensuite, dans ton code, il te suffit de dire Lig=xxx ... ;-) Ps : Tu n'est pas obligé de créer un module, du moment que tu définis ta variable HORS d'une Sub... Mais la maintenance sera plus difficile... Wild and Free
|
;-)
Dans ce cas, tu peux aussi utiliser un tableau : Public Lig() Qui te crée une matrice vide, que tu peux ensuite redimensionner à souhait... Redim Preserve Lig(10,10) par exemple te recrée une struxture de 10 lignes/10 colonnes sans toucher à ce que tu avait précédemment.... Ensuite : Lig(1,1)="toto" Lig(2,1)="titi"...... ;-) Wild and Free
|
Trucs & astuces pertinents trouvés dans la base de connaissances
Plus d'astuces sur « code vba »
| 13/04 12h54 | VBA et les collections d'objets. | Excel |
| 29/05 11h37 | VBA Ajouter commandButton et le code qui va avec | Excel |
| 10/04 09h20 | VBA Un timer une seconde tout simple | Excel |
| 16/05 09h19 | VBA: Se servir du compagnon pour communiquer avec l'utilisateur. | Bureautique |
| 03/04 17h28 | On peut cacher le code source d'une page HTML | Mythes et légendes |
Discussions pertinentes trouvées dans le forum
Plus de discussions sur « code vba »
| 22/07 12h31 | Erreur code vba | 72 |
| 28/04 11h23 | Execution de code VBA | 3 |
| 28/04 08h01 | Modèle Excel - Code VBA | 4 |
| 10/04 14h58 | Explication code vba | 1 |
| 09/04 10h21 | Explication code vba | 14 |
Logiciels pertinents trouvés dans les téléchargements
Plus de logiciels gratuits sur « code vba »
 | Vista Codec Package - Vista Codec Package regroupe une collection impressionnante de codecs (audio et vidéo), permettant d'ouvrir la plupart... | Catégorie: Codecs Licence: Freeware/gratuit |
 | DivX codecs - Le codec Divx Community est gratuit pour un usage personnel et permet de lire les fichiers au format DivX ! L'installeur... | Catégorie: Codecs Licence: Freeware/gratuit |
 | K-Lite Codec Pack Full - K-Lite Codec Pack est une collection de codecs et de filtres nécessaires pour encoder ou décoder des formats audio ou vidéo.... | Catégorie: Codecs Licence: Open Source |
 | K-Lite Mega Codec Pack - K-Lite Codec Pack est une collection de codecs et de filtres nécessaires pour encoder ou décoder des formats audio ou vidéo.... | Catégorie: Codecs Licence: Open Source |
Produits relatifs
Plus de produits sur « code vba »
 | Resident Evil - Code: | Catégorie: Jeu vidéo Gamecube | 44.95 € Amazon.fr |
 | Zack & Cody: Circle | Catégorie: Jeu vidéo Nintendo DS | 27.99 € Amazon.fr |
 | Untold Legends: The Warriors | Catégorie: Jeu vidéo PSP | 49.95 € Amazon.fr |
 | Code de la Route | Catégorie: Jeu vidéo Nintendo DS | 19.05 € Grosbill.com |