Discussion :

[chidori-san]

Bonjour,

J'ai 5 variables publiques : SousPerimetre1 à SousPerimetre5, auxquelles j'ai déjà affecté des valeurs. Je voudrai leur donner la valeur nulle en fonction de la valeur de la case à cocher correspondante. Les cases à cocher sont nommées Case_1 à Case_5. J'ai essayé le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Image_Valider_Click()
 
For i = 1 To 5
   If Forms![03ChoixPerimetre].Controls("Case_" & i).Visible = True And _
   Forms![03ChoixPerimetre].Controls("Case_" & i).Value = 0 Then
      SousPerimetre & i = ""   
   End If
Next i
 
DoCmd.Close acForm, "03ChoixPerimetre"
DoCmd.OpenForm ("04ConstructionOuSuivi")
 
End Sub

Il ne fonctionne pas, j'aimerai savoir si la concaténation est possible sur une variable publique. J'ai essayé les parenthèses, et plein d'autres choses mais rien ne fonctionne. Pouvoir concaténer des variables me serait utile dans d'autres codes également...

[Pepito78]

Bonjour

Un tableau semble plus adapté

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public SousPérimètre(4) as string 'Quel est le type de SousPérimètre ???
 
Private Sub Image_Valider_Click()
Dim i as long
 
For i = 1 To 5
 
   If Forms![03ChoixPerimetre].Controls("Case_" & i).Visible = True And _
   Forms![03ChoixPerimetre].Controls("Case_" & i).Value = 0 Then
 
          SousPerimetre (i-1)=""  
 
   End If
 
Next i

Cordialement

[chidori-san]

Merci pour cette réponse si rapide, le problème c'est que ces variables (type chaîne) sont déjà utilisées dans pas mal de codes et proviennent du résultat d'une requête. J'ai une cinquantaine de formulaires donc il faudrait que je regarde dans chaqun d'eux pour tout changer. Existe-t-il une autre solution?

PS : Comment faire pour afficher l'extrait du code comme vous le faites avec les numéros de lignes, je suis encore novice en access et ce serait plus lisible pour mes futures questions

[Pepito78]

Existe-t-il une autre solution?

Personnellement, je ne vois pas sans beaucoup plus de détails sur votre application...

Pour faire apparaître votre code, il faut utiliser la balise [Code], dans la fenêtre de rédaction, dans la barre d'outils, vous avez un icone #.

[chidori-san]

En fait, plusieurs utilisateurs utilisent la BDD. Certains d'entre eux, les responsables, ont un périmètre de responsabilité, découpé en un ou plusieurs (maximum 5) sous périmètres. Donc, quand ils s'identifient afin d'accéder à la base, je retiens les informations donc j'ai souvent besoin après : nom, prénom, périmètre, sous-périmètre,...
La BDD sert , entre autres, à restituer des états analysant les frais réels, à faire des demandes de modification de budgets, à construire ces derniers,...
Donc j'ai créé un accès pour les responsables : ils arrivent sur un formulaire dans lequel s'inscrivent leurs sous-périmètres de responsabilité (sauf s'ils n'en n'ont qu'un, dans ce cas, ils passent directement au formulaire suivant). Ils doivent cocher ceux qui les intéressent à l'instant t, pour que tous les formulaires suivants puissent être pré-remplis.

Merci encore une fois de m'aider. Sinon, comme il n'y a pas beaucoup de choix, je peux faire une fonction public dépendant de i avec Select case (case 1, vider SousPerimetre1,...) puis appeler la fonction dans le code du formulaire de choix? Ce n'est pas la première fois que j'ai envie de concaténer des variables, et chaque fois je passe par autre chose. Il n'y a pas une fonction ou autre qui permette de le faire?

[Pepito78]

Sinon, comme il n'y a pas beaucoup de choix, je peux faire une fonction public dépendant de i avec Select case (case 1, vider SousPerimetre1,...) puis appeler la fonction dans le code du formulaire de choix? Ce n'est pas la première fois que j'ai envie de concaténer des variables, et chaque fois je passe par autre chose. Il n'y a pas une fonction ou autre qui permette de le faire?

En effet, si toute votre application est construite sur cette base...

Un select case, sinon, personnellement, je ne vois pas... à part remettre votre base d'aplomb !

Pour la "concaténation", il ne me semble pas avoir déjà vu quelque chose de ce type.

Désolé , peut-être quelqu'un d'autre ?

[Benoit6000]

En fait, plusieurs utilisateurs utilisent la BDD. Certains d'entre eux, les responsables, ont un périmètre de responsabilité, découpé en un ou plusieurs (maximum 5) sous périmètres. Donc, quand ils s'identifient afin d'accéder à la base, je retiens les informations donc j'ai souvent besoin après : nom, prénom, périmètre, sous-périmètre,...
La BDD sert , entre autres, à restituer des états analysant les frais réels, à faire des demandes de modification de budgets, à construire ces derniers,...
Donc j'ai créé un accès pour les responsables : ils arrivent sur un formulaire dans lequel s'inscrivent leurs sous-périmètres de responsabilité (sauf s'ils n'en n'ont qu'un, dans ce cas, ils passent directement au formulaire suivant). Ils doivent cocher ceux qui les intéressent à l'instant t, pour que tous les formulaires suivants puissent être pré-remplis.

Merci encore une fois de m'aider. Sinon, comme il n'y a pas beaucoup de choix, je peux faire une fonction public dépendant de i avec Select case (case 1, vider SousPerimetre1,...) puis appeler la fonction dans le code du formulaire de choix? Ce n'est pas la première fois que j'ai envie de concaténer des variables, et chaque fois je passe par autre chose. Il n'y a pas une fonction ou autre qui permette de le faire?

Si j'ai bien compris chaque fois qu'un utlisateur se connecte sur ta db; il sélectionne dans un formulaire "un sous-périmètre" puis ouvre un autre formulaire?. A la fermeture du 1er formulaire il est possible d'écrire la valeur que tu cherche dans une variable public pour la concaténer.