OVH Cloud OVH Cloud

Je reviens de nouveau

1 réponse
Avatar
Denys
Bonjour,

Hier soir j'ai =E9cris le message ci-bas. Isabelle m'a=20
gentiment r=E9pondu avec un exemple. Cependant, j'y ai pass=E9=20
quelques temps, et je n'ai pas pu m'en tirer avec sa=20
r=E9ponse. Je me permets donc de le r=E9afficher avec la=20
r=E9ponse d'Isabelle. Peut-=EAtre y a-t-il quelque chose que=20
je n'ai pas compris, mais je me retrouve toujours avec la=20
r=E9ponse "Type mismatch".

Isabelle, ne le prends pas personnel, c'est probablement=20
moi qui n'est pas assez avanc=E9 pour tout comprendre.

Merci

Denys



Bonsoir =E0 tous,
>=20
> Je fais face =E0 un probl=E8me nouveau, et comme c'est
> souvent le cas, j'ai besoin de votre aide.
>=20
> J'ai cr=E9=E9 un userform sur lequel l'usager doit entrer les
> d=E9penses sauv=E9es durant le mois en cours. Cependant, ces
> d=E9penses peuvent =EAtre r=E9currentes, i.e. se renouveler =E0
> chaque mois. Auquel cas, j'aimerais qu'elles ne soient
> entr=E9es qu'une seule fois pour l'ann=E9e fiscale.
>=20
> D'abord, chaque usager doit cliquer sur un bouton
> d'option indiquant pour quelle succursale il travaille.
> Ensuite, un textbox1 d=E9crivant ce qui a =E9t=E9 sauv=E9, puis
> un autre textbox2 o=F9 le montant doit =EAtre indiqu=E9.
>=20
> Ensuite, deux boutons d'option demandant si le montant
> est r=E9current, oui ou non. Que le choix soit oui ou non,
> l'usager doit choisir =E0 quel mois ou =E0 partir de quel
> mois on doit inscrire le montant dans un combobox1 juste
> =E0 c=F4t=E9. Si le montant n'est que pour un mois, =E7a va.
> Cependant, si le choix est r=E9current, l=E0, j'ai un
> probl=E8me.
>=20
> Mon ann=E9e fiscale commence en novembre. Je dois donc dire
> =E0 Excel que si le bouton d'option choisi est oui, le
> montant inscrit dans le textbox2 doit =EAtre inscrit dans
> toutes les cellules =E0 droite (et incluant) celle du mois
> choisie dans le combobox1 jusqu'au mois d'octobre.
> (Sachant qu'en D c'est le montant pour novembre, E pour
> d=E9cembre, etc...).
>=20
> Donc, si le montant est $25 en janvier, et que ce montant
> se r=E9p=E8te pour l'ann=E9e enti=E8re, il devra y avoir un
> montant qui s'inscrira en colonne F jusqu'en O pour
> octobre, fin de l'ann=E9e.
>=20
> Il me semble qu'il devra y avoir plusieurs IF....
>=20
> Genre, si le bouton d'option est oui, et que le mois
> choisis est f=E9vrier, daonc copie le montanat incrit dans
> le textbox2 jusqu'=E0 la colonne O.
>=20
> Pas =E9vident n'est-ce pas?
>=20
> Quelqu'un aurait une id=E9e?
>=20
> Merci pour votre patience et pour votre temps
>=20
> Denys

bonjour Denys,

voici un exemple, j'ai suppos=E9 que les mois sont en ligne=20
1 et que la
valeur doit =EAtre retourn=E9 sur la ligne 2.

Sub Macro1()
'=E0 modifier pour la valeur des diff=E9rents objets=20
(CheckBox1, Textbox et
ComboBox)
succursalle =3D "Montr=E9al"
Valeur =3D "Janvier"
bouton =3D "oui"
montant =3D 25
colonne =3D Application.Match(Valeur, Rows(1), 0)
If bouton =3D "oui" Then
Sheets(succursalle).Range(Cells(2, colonne), Cells(2, 15))=20
=3D montant
Else
Sheets(succursalle).Cells(2, colonne) =3D montant
End If
End Sub

isabelle

1 réponse

Avatar
...Patrick
Il semble que le(s) nom(s) du mois doit être écrit en dur
et pas comme une date

...Patrick


-----Message d'origine-----
Bonjour,

Hier soir j'ai écris le message ci-bas. Isabelle m'a
gentiment répondu avec un exemple. Cependant, j'y ai
passé

quelques temps, et je n'ai pas pu m'en tirer avec sa
réponse. Je me permets donc de le réafficher avec la
réponse d'Isabelle. Peut-être y a-t-il quelque chose que
je n'ai pas compris, mais je me retrouve toujours avec la
réponse "Type mismatch".

Isabelle, ne le prends pas personnel, c'est probablement
moi qui n'est pas assez avancé pour tout comprendre.

Merci

Denys



Bonsoir à tous,

Je fais face à un problème nouveau, et comme c'est
souvent le cas, j'ai besoin de votre aide.

J'ai créé un userform sur lequel l'usager doit entrer
les


dépenses sauvées durant le mois en cours. Cependant, ces
dépenses peuvent être récurrentes, i.e. se renouveler à
chaque mois. Auquel cas, j'aimerais qu'elles ne soient
entrées qu'une seule fois pour l'année fiscale.

D'abord, chaque usager doit cliquer sur un bouton
d'option indiquant pour quelle succursale il travaille.
Ensuite, un textbox1 décrivant ce qui a été sauvé, puis
un autre textbox2 où le montant doit être indiqué.

Ensuite, deux boutons d'option demandant si le montant
est récurrent, oui ou non. Que le choix soit oui ou non,
l'usager doit choisir à quel mois ou à partir de quel
mois on doit inscrire le montant dans un combobox1 juste
à côté. Si le montant n'est que pour un mois, ça va.
Cependant, si le choix est récurrent, là, j'ai un
problème.

Mon année fiscale commence en novembre. Je dois donc
dire


à Excel que si le bouton d'option choisi est oui, le
montant inscrit dans le textbox2 doit être inscrit dans
toutes les cellules à droite (et incluant) celle du mois
choisie dans le combobox1 jusqu'au mois d'octobre.
(Sachant qu'en D c'est le montant pour novembre, E pour
décembre, etc...).

Donc, si le montant est $25 en janvier, et que ce
montant


se répète pour l'année entière, il devra y avoir un
montant qui s'inscrira en colonne F jusqu'en O pour
octobre, fin de l'année.

Il me semble qu'il devra y avoir plusieurs IF....

Genre, si le bouton d'option est oui, et que le mois
choisis est février, daonc copie le montanat incrit dans
le textbox2 jusqu'à la colonne O.

Pas évident n'est-ce pas?

Quelqu'un aurait une idée?

Merci pour votre patience et pour votre temps

Denys


bonjour Denys,

voici un exemple, j'ai supposé que les mois sont en ligne
1 et que la
valeur doit être retourné sur la ligne 2.

Sub Macro1()
'à modifier pour la valeur des différents objets
(CheckBox1, Textbox et
ComboBox)
succursalle = "Montréal"
Valeur = "Janvier"
bouton = "oui"
montant = 25
colonne = Application.Match(Valeur, Rows(1), 0)
If bouton = "oui" Then
Sheets(succursalle).Range(Cells(2, colonne), Cells(2,
15))

= montant
Else
Sheets(succursalle).Cells(2, colonne) = montant
End If
End Sub

isabelle



.