Code vba

Fermé

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005 - 9 juin 2005 à 10:40
WhiteFang Messages postés 2063 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 15 février 2008 - 9 juin 2005 à 15:42

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

A voir également:

Code vba
Code asci - Guide
Code puk bloqué - Guide
Code telephone oublié - Guide
Code activation windows 10 - Guide
Code gta 4 ps4 - Guide

8 réponses

Réponse 1 / 8

Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 1 528
9 juin 2005 à 11:04

Bonjour fabieg,

Est-ce que :
LblRaison.Caption= "Raison Sociale" & Chr(10) & Sheets("bd").Range("A").Value & Lig
ne marcherait pas mieux ?

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 11:09

Non ça me mêt le même message d'erreur, décidément je ne vois pas ce qui cloche...

Réponse 2 / 8

Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 1 528
9 juin 2005 à 11:16

Réponse 3 / 8

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 11:19

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

Réponse 4 / 8

Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 1 528
9 juin 2005 à 11:28

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.

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 11:41

stp après j'essaie de plus t'embeter...Tu peux m'expliquer comment je définie Lig?
Merci pour ton aide

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 8

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 11:30

mais je fais comment pour le définir?

Réponse 6 / 8

Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 1 528
9 juin 2005 à 11:53

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.

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 11:56

bah en fait le numéro de la ligne dépend du choix fait dans un userform précédent...

Armojax Messages postés 1860 Date d'inscription mercredi 19 janvier 2005 Statut Membre Dernière intervention 2 octobre 2024 1 528 > fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 12:06

OK.
Donc, dans ton userform précédent, stocke quelque part cette information, dans une constante de portée générale, dans une cellule d'une feuille..., où tu veux.
Et ensuite, commence ta procédure d'initialisation avec : Lig = <la valeur stockée>.
Ajx.

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005 > fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 12:08

mais je la stocke comment l'info dans mon premier userform?

Réponse 7 / 8

WhiteFang Messages postés 2063 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 15 février 2008 204
9 juin 2005 à 13:11

;-)

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...

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 14:36

Merci beaucoup! et par contre si j'en ai plusieurs des "Lig" qui se réfèrent à différentes colonnes je les écrit tous? et je les différencie comment? Lig1,Lig2...?

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 14:44

Malheureuresement mon code ne fonctionne toujours pas...
Voici ce que j'ai mis dans mon premier userform:
'définition'
Public Lig As RaisonSociale
et dans mon deuxième userform:
Private Sub Userform_Initialize
Lig = RaisonSociale
Dim Plus As String
LblRaison.Caption = Sheets("bd").Range("A").Value & Lig

et ça m'affiche l'erreur 1004 erreur définie par l'application ou par l'objet...
Pouvez-vous me dire ce qui ne va pas?
Merci d'avance

WhiteFang Messages postés 2063 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 15 février 2008 204 > fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 14:49

;-)

Public Lig As

-> INTEGER/LONG/STRING.....

;-)

Si c'est un N° de ligne Excel : Public Lig As Long

;-)

Réponse 8 / 8

WhiteFang Messages postés 2063 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 15 février 2008 204
9 juin 2005 à 14:47

;-)

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"......

;-)

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 14:52

Suis désolée mais j'ai pas compris...:( je dois refaire un tableau sous excel dans une nouvelle feuille? mais dans ma base initiale j'ai 1600 lignes... je ne vois vraiment pas ce que je dois faire

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005
9 juin 2005 à 15:00

Est-ce que je pourrais t'envoyer mon fichier?tu pourrais peut-être mieux voir ce que j'ai fait comme bétise...

;-)

OK ...

Cliques là : http://forum.aceboard.net/index.php?login=113149

Je t'attends...

;-)

fabieg Messages postés 15 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 9 juin 2005 > WhiteFang Messages postés 2063 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 15 février 2008
9 juin 2005 à 15:36

je n'arrive pas à m'inscrire il me dit que la clé est fausse

;-)

il faut attendre le mail de confirmation, quand tu le reçois, tu cliques sur le lien et c'est bon...

;-)

Discussions similaires

Code de renvoi d'appel : Ooredo, Mobilis...

code d'activation GTA 5 steam

Codes bateaux et avion GTA vice city Stories

enigme

Code Ascii