OVH Cloud OVH Cloud

VBA, faire une mcro ???

63 réponses
Avatar
LE TROLL
Bonjour,

En VBA, comment faire une macro dans Excel, soit:

Objet: Pour pointer un compte, lors du rapprochement avec le relevé de
compte, je coche une case d'un "X" graissé en majuscule quand chaque
opération est identique sur le relevé et sur Excel où je fais le compte...

Problème, quand je coche, ça m'oblige à mettre en majuscule, et ou, je me
trompe de lettre (m'astreignant à corriger), d'onc une macro serait la
bienvenue, comme suit:


' nb, la colonne "G" est déjà graissée.
'
Sub Worksheet_Change...
Si Colonne = "G" Alors: Call ecrit_cellule
End Sub
'
Sub Worksheet_BeforeDoubleClick...
Si Colonne = "G" Alors: Call ecrit_cellule
End Sub
'
Sub ecrit_cellule()
On Error Resume Next
Si (Colonne "G" Cellule_Active) <> "X" alors:
Met dans (Colonne G Cellule_Active) = majuscules
Ecrit (Colonne "G" Cellule_Active) = "X"
Exit Sub
Fin de Si
Ecrit (Colonne "G" Cellule_Active) = ""
End Sub

---------------------------------
Merci de m'écrire cette macro.
---------------------------------

--
ng75 arobase noos.fr
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison !

10 réponses

Avatar
twinley
Bonsoir Mon Prince,

Je ne comprend pas bien les questions du forum, ni le VBA.
J'ai quelques connaissances en Français et ma nature diplomate est
quelque peu heurtée par tes certitudes et ta promptitude à dénicher les
cons. Nul doute que tu sois un spécialiste dans ce domaine.
Puis je suggérer, sans t'imposer quoi que ce soit de façon
psycho-rigide, d'aller sur le forum VB, ils sont effectivement plus
compétents et beaucoup plus sympa qu'ici.

et si de vous agréer,
je n'emporte le prix
j'aurais au moins
l'honneur de l'avoir entrepris.

twinley

LE TROLL wrote:
Eh mon pote, je demande un truc, alors il y a plusieurs possibilités:
Soit on ne sait pas, donc on ne répond pas...
Soit on sait mais on ne veut pas (plus rare), ben idem
Soit on sait et on répond...

Dans les deux premiers cas on ferme sa gueule, le problème et que j'ai
des cons qui m'ont répondu sans pour autant faire avancer le problème, et
sans savoir comment faire...

C'est clair, je demande un procédure qui marche (faute de compétence de
ma part), soit on me file la procédure, soit on passe son chemin, c'est
simple, pourquoi y a toujours des vermines qui viennent parasiter les
questions (toi y compris, car je pose une question, et tu réponds autre
chose)???
-------------

"JièL Goubert" a écrit dans le
message de news: %23$

Bonjoir(c) Rai

Laissez tomber, il porte parfaitement bien son pseudo, il a fait la même
chose dans le forum OE6 il y a peu, il demande un TALC et engueule ceux
qui ne font pas EXACTEMENT comme il le voudrait.

on est gaté en ce moment :-(
Heureusement qu'il reste des gens sympa...

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/
*** ENQUETE SUR LES NEWSGROUPS MICROSOFT FRANCOPHONES ***
http://collecxia.microsoft.fr/formulaires/forms/enquetenewsgroupfy04/

Le 05/12/2004 14:22 vous avez écrit ceci :

Au fait le troll, tu poses souvent 2 fois les même questions dans le même
forum ??
(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2 lignes
que ta manière de répondre en devient sympa ...
Et aussi : souviens-toi que les gens ici sont des bénévoles passionnés et
non des 'pisseurs de ligne' corvéables à merci.

Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une pôôvre
macro, quand même ??!

Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais sous
tes ordres...

Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai









Avatar
michdenis
Bonjour Le Troll,

"ça bouclait tout le temps"

C'est le propre des procédures événementielles. Elles sont appelées par une action directe de l'usager dans la feuille
de calcul.

Sub Worksheet_Change(ByVal Target As Range)

Cet procédure est appelé à chaque fois qu'une cellule passe en mode "Édition" cela peut être fait par un double-clic
directement sur une cellule ou l'utilisation de la touche F2. A ce moment là, le curseur clignote dans une cellule.
Évidemment si l'usager entre une nouvelle donnée au moment où une cellule est sélectionnée, c'est suffisant pour générer
l'événement.

Comme tu avais aussi cet événement qui se déclenche sur "double-clic), celle-ci était aussi déclenchée ... chacun des
événements appelaient l'autre.... Elles sont indépendantes dans leur fonctionnement si l'on désire mais elles peuvent
aussi être en interaction.

Pour qu'elles soient indépendantes, il s'agit d'utiliser la ligne de code "Application.EnableEvents = False au moment
opportum. (ne pas oublier de la remettre à true)(un exemple dans le code que je t'ai suggéré). Sinon, dans certaines
circonstances... ces procédures partent en boucle car elles s'appellent mutuellement.

Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

Pour voir ce qui se passe, utilise en début de procédure la ligne de commande Stop , elle va arrêter le code et tu
exécutes le reste du code à l'aide de la touche F8... cette dernière va te permettre de suivre le cheminement de ta
macro ligne par ligne et tu auras l'occasion d'observer le phénomène de "boucle" le cas échéant.



Salutations!









"LE TROLL" <le a écrit dans le message de news:
Bonzour :o)

Merci, mais dis-moi, préalablement, as-tu regardé mon code, car ça
marche et je cherchais à l'améliorer (j'connais pas vb"A")... En plus
j'avais un problème, je sortais de l'if par un end sub, et ça bouclait tout
le temps, alors je lui ai balancé un end, mais pourquoi ça bouclait tout le
temps?

Je suis content qu'il y ait des gens et qui répondent, et qui s'y
connaissent, comme toi, merci, depuis le début de l'après-midi, je n'avais
que des truc vaseux, inexploitables, et en plus des réflexions quand je
disais que la réponse était inexploitable... ah, merci, à te lire ???
---------

"michdenis" a écrit dans le message de news:

Bonjour Le Troll,


Essaie ceci ...

'--------------------------------------
Sub Worksheet_Change(ByVal Target As Range)

Dim Rg As Range, C As Range
Set Rg = Intersect(Target, Columns("G"))

If Not Rg Is Nothing Then
Application.EnableEvents = False
For Each C In Rg
If UCase(C) = "X" Then
C.Value = UCase(C)
C.Font.Bold = True
Else
C.Value = ""
End If
Next
Application.EnableEvents = True
End If
Set Rg = Nothing: Set C = Nothing

End Sub
'--------------------------------------



Salutations!





"LE TROLL" <le a écrit dans le message de news:

Salut 3, tiens, voici ce que j'ai fait (en 10 minutes et tout
seul),
ça marche, saurais-tu l'optimiser ?

' macro auto-pointage module 1 : compta.xls
'
Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, Columns("G")) <> "" Then
If Intersect(Target, Columns("G")) = " " Then: GoTo efface
If Len(Intersect(Target, Columns("G"))) > 1 Then: GoTo efface
Intersect(Target, Columns("G")) = UCase(Target)
Intersect(Target, Columns("G")) = "X"
End
End If
If Intersect(Target, Columns("G")) = "X" Then
efface:
Intersect(Target, Columns("G")) = ""
End
End If
End Sub


Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
On Error Resume Next
If Intersect(Target, Columns("G")) <> "X" And Intersect(Target,
Columns("G")) <> "x" Then
Intersect(Target, Columns("G")) = UCase(Target)
Intersect(Target, Columns("G")) = "X"
End
End If
If Intersect(Target, Columns("G")) = "X" Then
Intersect(Target, Columns("G")) = ""
End
End If
End Sub
-------------

C'est ça que je te demandais de faire (s'il te plaît), c'était un
procédure
qui fonctionne, comme les deux que je viens de faire :o)

Merci si tu as des améliorations de code (moi je ne connais que VB) ???
----------


"Rai" a écrit dans le message de news:
41b2e22f$0$8092$
Hey,

Si je veux j'écris la macro !
D'ailleurs, a priori tu connais un peu les macros puisque tu vuex utiliser
les évennments de la feuille, appeler une procdure et que tu utilises des
choses comme 'exit sub'.

Avant de partir là-dessus, je te conseille d'appuyer sur la touche F1 et
de
regarder comment fonctionne la validation.
Avec la validation, telle que je te l'ai décrite précédemment, tu peux
mettre AU CHOIX 'X' ou rien dans les cellules validées.

Donc, si tu as des chèques non-encaissés tu laisse la cellule vide
Si tu as des comptes pointés ... tu mets X

Soit, je n'ai rien compris à tes besoins, soit il faut que tu les
réexpliques.

Rai

"LE TROLL" <le a écrit dans le message de news:
%
Salut, merci, non, je ne teste valide pas toute la colonne car il
y
a des trous (chèque non encaissé par exemple), par contre, si tu pouvais
me
faire ma macro comme demandé car je ne connais pas le VBA, merci :o)
-----

"Rai" a écrit dans le message de news:
41b2d068$0$3415$
Bonjour,

Si je regarde ta signature, je comprends pourquoi tu veux absolument
passer
par une macro ...
... en effet, pourquoi utiliser une pince à épiler quand on peut utiliser
une hache pour enlever une écharde !! ;o))

Bon, trève de plaisanterie.
Tu peux certainnement utiliser une macro, mais tu peux aussi utiliser la
validation de données.
- sélectionner les cellules qui servent à pointer avec "X", pourquoi
pas
directement sélectionner toute la colonne
- Menu 'Données' / 'Validation'
- Autoriser 'liste'
- dans 'source' tu mets X

voilà, ça devrait pas mal fonctionner maintenant.

Pour éviter le problème maj/min et ainsi autoriser la saisie de x ou X,
tu pouvais aussi inclure la fonction majuscule() dans tes formules.
Plutôt que de tester =si(G2="X";blabla;bloblo) tu peux écrire
=si(majuscule(G2)="X"; ....)

Bon Dimanche

Rai









Avatar
twinley
Nous sommes d'accord j'espère, j'ai demandé avec politesse 2 procédures,
soit on me les file, soit on passe son chemin, mais quand on me
balance des

merdes comme ça en réponse, oui, ça chauffe sous le chapeau...


Tu as un sens aigu de la politesse.
Si tu crois que tu vas conquérir le monde avec ton QI d'acarien ? C'est
pas gagné pour toi...
Ne t'inquiètes pas, ton fil n'est pollué que par toi, et tu vas l'avoir
pour toi tout seul.
Quand à la pub pour ton site tristouille, je doute qu'une seule personne
du MPFE soit allée le voir.
Pour info, tu viens d'insulter toutes les pointures du NG. Tu fais fort,
pas en programmation visiblement, mais dans l'invective. Si tu devais
prouver tes compétences c'est une franche réussite. Je me marre.
Les insultes à mon encontre seront justifiées car je suis sec en VBA et
en programmation. Depuis que je vois ou cela mène, je pense à une autre
orientation.
Ne t'offusque pas si je détourne la tête mais tu refoules du goulot.

Bon vent.

twinley


LE TROLL wrote:
Ben voui "Miso", j'annonce la couleur:
-1- Je ne connais pas VBA, donc
-2- Je demande "s'il vous plaît":
-3- Une procédure qu'en collant, fonctionne pour une action que je décris,
c'est un cahier des charges, ça doit fonctionner comme je le désir, on
accepte ou pas, le code est libre, mais pas le résultat, on sait le faire ou
pas, mais je ne bidouille pas avec des approximations, c'est ainsi).
POINT final, on me donne ou pas (et je dis merci quand on me donne)...

Et si tu doutes de ma compétence face d'oeuf, vas voir un de mes sites (j'ai
dû faire plus de 100 applications vendues), et lis un de mes douze romans
aussi...

http://irolog.free.fr/


REGARDE !
Si tu doutes, voici ce que je demande (et je dis "merci")
nb, la colonne "G" est déjà graissée.
'
Sub Worksheet_Change...
Si Colonne = "G" Alors: Call ecrit_cellule
End Sub
'
Sub Worksheet_BeforeDoubleClick...
Si Colonne = "G" Alors: Call ecrit_cellule
End Sub
'
Sub ecrit_cellule()
On Error Resume Next
Si (Colonne "G" Cellule_Active) <> "X" alors:
Met dans (Colonne G Cellule_Active) = majuscules
Ecrit (Colonne "G" Cellule_Active) = "X"
Exit Sub
Fin de Si
Ecrit (Colonne "G" Cellule_Active) = ""
End Sub
'
' Merci de m'écrire cette macro. <<<-------

*-*-*-*-*-*-*
ET VOICI CE QUE REPONDENT NOTAMMENT:
-------------------------------------------------------
Ça c'est "RAI"
- sélectionner les cellules qui servent à pointer avec "X", pourquoi pas
directement sélectionner toute la colonne
- Menu 'Données' / 'Validation'
- Autoriser 'liste'
- dans 'source' tu mets X
Pour éviter le problème maj/min et ainsi autoriser la saisie de x ou X,
tu pouvais aussi inclure la fonction majuscule() dans tes formules.
Plutôt que de tester =si(G2="X";blabla;bloblo) tu peux écrire
=si(majuscule(G2)="X"; ....)

Ça c'est "Le Steph"
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Target = "X"
End Sub

*-*-*-*-
TU VEUX QUE JE FASSE QUOI DES REPONSES DE CES DEUX CRETINS, TU CROIS QUE SI
JE COLLE ÇA, ÇA VA FONCTIONNER ??? Ben non, ça ne peut faire l'affaire,
alors pourquoi ils me répondent s'ils ne connaissent pas (comme moi) le VBA
???
Nous sommes d'accord j'espère, j'ai demandé avec politesse 2 procédures,
soit on me les file, soit on passe son chemin, mais quand on me balance des
merdes comme ça en réponse, oui, ça chauffe sous le chapeau...
------------

"Misange" a écrit dans le message de news:


Salut Rai,

Ben quoi, il annonce la couleur le mec non, il ne signe pas "le gentil qui
sait pas et demande poliment" ? Il dit clairement je suis un troll, j'en
suis fier et je m'en vante. Alors oui éleveuse de troll c'est un métier
mais a-t-il beaucoup d'avenir ça... :-) Sérieusement, les pseudos ça
révèle quand mmême bien ce que certains ont dans la tête non ?

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/12/2004 14:22:

Au fait le troll, tu poses souvent 2 fois les même questions dans le même
forum ??
(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2 lignes
que ta manière de répondre en devient sympa ...
Et aussi : souviens-toi que les gens ici sont des bénévoles passionnés et
non des 'pisseurs de ligne' corvéables à merci.

Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une pôôvre
macro, quand même ??!

Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais sous
tes ordres...

Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai

"LE TROLL" <le a écrit dans le message de news:



Bonjour,

En VBA, comment faire une macro dans Excel, soit:

Objet: Pour pointer un compte, lors du rapprochement avec le relevé de
compte, je coche une case d'un "X" graissé en majuscule quand chaque
opération est identique sur le relevé et sur Excel où je fais le
compte...

Problème, quand je coche, ça m'oblige à mettre en majuscule, et ou, je me
trompe de lettre (m'astreignant à corriger), d'onc une macro serait la
bienvenue, comme suit:












Avatar
Dédé
Des gens sympa ;-)))

Merci JièL !

à +
Dédé
"JièL Goubert" a écrit dans le
message de news:%23$
Bonjoir(c) Rai

Laissez tomber, il porte parfaitement bien son pseudo, il a fait la même
chose dans le forum OE6 il y a peu, il demande un TALC et engueule ceux
qui ne font pas EXACTEMENT comme il le voudrait.

on est gaté en ce moment :-(
Heureusement qu'il reste des gens sympa...

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/
*** ENQUETE SUR LES NEWSGROUPS MICROSOFT FRANCOPHONES ***
http://collecxia.microsoft.fr/formulaires/forms/enquetenewsgroupfy04/

Le 05/12/2004 14:22 vous avez écrit ceci :
Au fait le troll, tu poses souvent 2 fois les même questions dans le
même forum ??


(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2 lignes
que ta manière de répondre en devient sympa ...


Et aussi : souviens-toi que les gens ici sont des bénévoles passionnés
et non des 'pisseurs de ligne' corvéables à merci.



Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une pôôvre
macro, quand même ??!



Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais sous
tes ordres...



Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai




Avatar
Misange
Voici donc une splendide démonstration : comme notre troll nous
l'explique si bien, la seule réponse à apporter c'est le silence. Pas
pour les raisons qu'il croit mais le résultat n'est pas différent. Mieux
vaut se taire que d'apporter la moindre aide à des trolls pareils, sous
peine de se faire engueuler. De toutes façons en 15 minutes chrono il
avait trouvé la réponse tout seul. Et comme le dit le grand sage
RhaaniRhamanagnagna, si notre absence de bonnes réponses a permis à un
troll de s'initier tout seul à VBA (après 15 ans de programmation dans
des langages autrement plus sérieux certes) si donc il a su faire en 15
minutes ce qu'aucun des meilleurs d'entre nous n'a réussi à faire alors
je crois qu'il est du devoir de microsoft de le nommer MVP dans l'heure.
Que dis-je dans la minute ! C'est un exploit digne des plus grands et
nous devrions être plus que fiers d'accueillir en notre sein un auteur,
pardon, un Ecrivain (avec un grand E majuscule), doublé d'un auteur de
programmes et d'un webmaster. Devant tant de commpétences, nous
n'aurions même pas du oser lui faire une suggestion, pauvres petits
êtres qui devrions continuer de ramper devant tant de grandeur (pas
d'âme quand même).
En effet le grand sage RhaaniRhamanagnagna ne dit-il pas qu'il vaut
mieux apprendre à un home à faire du VBA plutôt que de lui donner un
code tout cuit ?
Maintenant qu'il a reçu le VBA comme d'autres sont un jour d'un seul
coup admis dans la confrérie des buveurs de beaujolais nouveau, nul
doute qu'il va partager son savoir puisque, grand connaisseur des usages
des forums, il ne peut que se sentir à son tour honoré de partager ses
connaissances pour venir en aide aux démunis.

Je ne peux pour ma part que regretter que certain par esprit de
contradiction peut être se fasse le champion des trolls et des malotrus,
justifiant et encourageant ainsi ces comportements qui polluent le
forum. S'il n'est pas question de transformer le MPFE en un lieu de
courbettes et de blablas, si je trouve inconcevable que des nouveaux se
fassent renvoyer dans leurs filets parce qu'ayant utilisé une interface
web mal faite ils ne savent pas ce qu'est un forum et qui l'anime, je
trouve tout aussi inacceptable que des contributeurs ayant déjà une
certaine expérience des forums en général et de celui ci en particulier
refusent d'adhérer au strict minimum des règles de respect et de
bienséance. Refuser de répondre à ces trolls et malotrus c'est
préserver une certaine idée des relations sociales. Je déplore
franchement que certains répondent à quelqu'un qui se permet d'insulter
des contributeurs réguliers du forum.
Sur ce je prend le large jusqu'à ce que le plaisir de lire le MPFE
revienne, que mon oeil soit capable de zapper les ficelles polluées. Ce
ne sont pas les occupations qui manquent par ailleurs.
Bon vent


Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta

on 05/12/2004 19:06:
Salut Rai,

Ben quoi, il annonce la couleur le mec non, il ne signe pas "le gentil
qui sait pas et demande poliment" ? Il dit clairement je suis un troll,
j'en suis fier et je m'en vante. Alors oui éleveuse de troll c'est un
métier mais a-t-il beaucoup d'avenir ça... :-) Sérieusement, les pseudos
ça révèle quand mmême bien ce que certains ont dans la tête non ?

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/12/2004 14:22:

Au fait le troll, tu poses souvent 2 fois les même questions dans le
même forum ??
(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2 lignes
que ta manière de répondre en devient sympa ...
Et aussi : souviens-toi que les gens ici sont des bénévoles passionnés
et non des 'pisseurs de ligne' corvéables à merci.

Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une pôôvre
macro, quand même ??!

Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais
sous tes ordres...

Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai

"LE TROLL" <le a écrit dans le message de news:


Bonjour,

En VBA, comment faire une macro dans Excel, soit:

Objet: Pour pointer un compte, lors du rapprochement avec le relevé
de compte, je coche une case d'un "X" graissé en majuscule quand
chaque opération est identique sur le relevé et sur Excel où je fais
le compte...

Problème, quand je coche, ça m'oblige à mettre en majuscule, et ou,
je me trompe de lettre (m'astreignant à corriger), d'onc une macro
serait la bienvenue, comme suit:









Avatar
Dédé
Arrête te critiquer sur ce forum alors que, comme tu le dis, t'es bien plus
compétent que nous avec des 25 années de prog derrière toi !! Moi ça fait
que 3 ans que je bricole VBA et jamais au grand dieux jamais j'irais ôser
critiquer les compétences et connaissances et surtout le bienvouloir gratuit
des contributeurs de ce forum. Car, ce que j'en ai déduit de part mes
expérience de la vie, de nos jours, rien n'est gratuit et le seul truc que
j'ai trouvé de gratos et en plus, rendu avec le sourir et plein de bonne
volonté, ben c'est dans ce forum que je l'ai trouvé (et aussi le MPFW, MPFOL
et autres ... alors, je t'en prie, prends ce que l'on te propose mais tes
remarques désobligeantes, les contributeurs s'en passeraient bien !!!!

A bon entendeur, Salut !

Dédé
"LE TROLL" <le a écrit dans le message de
news:%230OF$
Ben moi je voudrais surtout des gens compétents, en un mot, car en ce
qui te concerne, ce serait plutôt en deux mots, regardes, on m'a en
définitive répondu, aussi en forum VB d'ailleurs, tu verras la qualité des
réponses, elle n'est pas la même que les conneries inutiles que tu m'a
répondu"...
----------

"LeSteph" a écrit dans le message de news:
ux%
:-)
Tu as bien raison, on sait désormais à quoi s'en tenir!
Et comme dirait quelqu'un: pfffff
A part cela il y a encore et surtout des gens sympa...

"JièL Goubert" a écrit dans le
message de news: %23$
Bonjoir(c) Rai

Laissez tomber, il porte parfaitement bien son pseudo, il a fait la
même



chose dans le forum OE6 il y a peu, il demande un TALC et engueule ceux
qui ne font pas EXACTEMENT comme il le voudrait.

on est gaté en ce moment :-(
Heureusement qu'il reste des gens sympa...

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/
*** ENQUETE SUR LES NEWSGROUPS MICROSOFT FRANCOPHONES ***
http://collecxia.microsoft.fr/formulaires/forms/enquetenewsgroupfy04/

Le 05/12/2004 14:22 vous avez écrit ceci :
Au fait le troll, tu poses souvent 2 fois les même questions dans le
même forum ??
(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2 lignes
que ta manière de répondre en devient sympa ...
Et aussi : souviens-toi que les gens ici sont des bénévoles passionnés
et non des 'pisseurs de ligne' corvéables à merci.

Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une pôôvre
macro, quand même ??!

Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais
sous




tes ordres...

Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai












Avatar
Dédé
re ... Je pense que là, tu t'es mis TOUT les contributeurs contre toi alors,
si il y a quelqu'un de trop par là, c'est certainement pas les personnes qui
ont reçu une bonne éducation et surtout, qui arrivent parfaiement à
l'appliquer !

Dernier message de ma part car la coupe est pleine ...

Dédé
"LE TROLL" <le a écrit dans le message de
news:u%
On t'a pas sifflé toi, t'écris pas dans ma question, on n'écrit
dans

ma question que pour me donner une réponse qui fonctionne par
copier/coller

(car je ne connais pas VBA), pigé p'tite tête :o)
-------------

"Corona" <Philippe Tulliez> a écrit dans le message de news:

Bonjour Jièl,
A la lecture de cette ficelle, je me demandais si je rêvais.
Comme tu l'écris si bien, heureusement qu'il reste des gens sympas et
.... polis.
Philippe

"JièL Goubert" a écrit dans le
message de news:%23$
Bonjoir(c) Rai

Laissez tomber, il porte parfaitement bien son pseudo, il a fait la
même



chose dans le forum OE6 il y a peu, il demande un TALC et engueule ceux
qui ne font pas EXACTEMENT comme il le voudrait.

on est gaté en ce moment :-(
Heureusement qu'il reste des gens sympa...

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/
*** ENQUETE SUR LES NEWSGROUPS MICROSOFT FRANCOPHONES ***
http://collecxia.microsoft.fr/formulaires/forms/enquetenewsgroupfy04/

Le 05/12/2004 14:22 vous avez écrit ceci :
Au fait le troll, tu poses souvent 2 fois les même questions dans le
même forum ??


(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2
lignes




que ta manière de répondre en devient sympa ...
Et aussi : souviens-toi que les gens ici sont des bénévoles
passionnés




et non des 'pisseurs de ligne' corvéables à merci.

Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une
pôôvre




macro, quand même ??!

Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais
sous
tes ordres...



Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai












Avatar
LeSteph
Ton crétin tu le conserves pour tes oeuvres,
Pour mettre un X majuscule pas besoin d'écrire une page ,
on t'a proposé des codes simples mais qui fonctionnent,.
Alors tu peux vérifier pas besoin de tes suggestions incongrues.
Mais si cela te plait d'être un bourrin libre à toi mais apprends à
rédiger une question...
Alors tu prends ton cahier des charges d'une main et ton manche de hache de
l'autre ...
...après on s'en moque.
(Et par respect pour les vrais trolls change de pseudo ).


:-[

lSteph



"LE TROLL" <le a écrit dans le message de news:

Ben voui "Miso", j'annonce la couleur:
-1- Je ne connais pas VBA, donc
-2- Je demande "s'il vous plaît":
-3- Une procédure qu'en collant, fonctionne pour une action que je décris,
c'est un cahier des charges, ça doit fonctionner comme je le désir, on
accepte ou pas, le code est libre, mais pas le résultat, on sait le faire
ou pas, mais je ne bidouille pas avec des approximations, c'est ainsi).
POINT final, on me donne ou pas (et je dis merci quand on me donne)...

Et si tu doutes de ma compétence face d'oeuf, vas voir un de mes sites
(j'ai dû faire plus de 100 applications vendues), et lis un de mes douze
romans aussi...

http://irolog.free.fr/


REGARDE !
Si tu doutes, voici ce que je demande (et je dis "merci")
nb, la colonne "G" est déjà graissée.
'
Sub Worksheet_Change...
Si Colonne = "G" Alors: Call ecrit_cellule
End Sub
'
Sub Worksheet_BeforeDoubleClick...
Si Colonne = "G" Alors: Call ecrit_cellule
End Sub
'
Sub ecrit_cellule()
On Error Resume Next
Si (Colonne "G" Cellule_Active) <> "X" alors:
Met dans (Colonne G Cellule_Active) = majuscules
Ecrit (Colonne "G" Cellule_Active) = "X"
Exit Sub
Fin de Si
Ecrit (Colonne "G" Cellule_Active) = ""
End Sub
'
' Merci de m'écrire cette macro. <<<-------

*-*-*-*-*-*-*
ET VOICI CE QUE REPONDENT NOTAMMENT:
-------------------------------------------------------
Ça c'est "RAI"
- sélectionner les cellules qui servent à pointer avec "X", pourquoi pas
directement sélectionner toute la colonne
- Menu 'Données' / 'Validation'
- Autoriser 'liste'
- dans 'source' tu mets X
Pour éviter le problème maj/min et ainsi autoriser la saisie de x ou X,
tu pouvais aussi inclure la fonction majuscule() dans tes formules.
Plutôt que de tester =si(G2="X";blabla;bloblo) tu peux écrire
=si(majuscule(G2)="X"; ....)

Ça c'est "Le Steph"
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Target = "X"
End Sub

*-*-*-*-
TU VEUX QUE JE FASSE QUOI DES REPONSES DE CES DEUX CRETINS, TU CROIS QUE
SI JE COLLE ÇA, ÇA VA FONCTIONNER ??? Ben non, ça ne peut faire l'affaire,
alors pourquoi ils me répondent s'ils ne connaissent pas (comme moi) le
VBA ???
Nous sommes d'accord j'espère, j'ai demandé avec politesse 2 procédures,
soit on me les file, soit on passe son chemin, mais quand on me balance
des merdes comme ça en réponse, oui, ça chauffe sous le chapeau...
------------

"Misange" a écrit dans le message de news:

Salut Rai,

Ben quoi, il annonce la couleur le mec non, il ne signe pas "le gentil
qui sait pas et demande poliment" ? Il dit clairement je suis un troll,
j'en suis fier et je m'en vante. Alors oui éleveuse de troll c'est un
métier mais a-t-il beaucoup d'avenir ça... :-) Sérieusement, les pseudos
ça révèle quand mmême bien ce que certains ont dans la tête non ?

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/12/2004 14:22:
Au fait le troll, tu poses souvent 2 fois les même questions dans le
même forum ??
(cf. ta précédente intervention du 18/11)

Juste comme ça : c'est pas parce-que tu mets 'lol' toutes les 2 lignes
que ta manière de répondre en devient sympa ...
Et aussi : souviens-toi que les gens ici sont des bénévoles passionnés
et non des 'pisseurs de ligne' corvéables à merci.

Tu programmes depuis 25 ans ??
Tu ne veux quand même pas apprendre le VBA pour juste faire une pôôvre
macro, quand même ??!

Mais tu VEUX bien qu'un gusse s'exécute à ta place, pour rien, mais sous
tes ordres...

Bienvenu dans ma boîtatrolls (anciennement boitakon).

Rai

"LE TROLL" <le a écrit dans le message de news:


Bonjour,

En VBA, comment faire une macro dans Excel, soit:

Objet: Pour pointer un compte, lors du rapprochement avec le relevé de
compte, je coche une case d'un "X" graissé en majuscule quand chaque
opération est identique sur le relevé et sur Excel où je fais le
compte...

Problème, quand je coche, ça m'oblige à mettre en majuscule, et ou, je
me trompe de lettre (m'astreignant à corriger), d'onc une macro serait
la bienvenue, comme suit:













Avatar
Clément Marcotte
Bonjour,

Arrête te critiquer sur ce forum alors que, comme tu le dis, t'es
bien plus

compétent que nous avec des 25 années de prog derrière toi .


En 25 ans, il a dû être obligé d'apprendre à utiliser Goto. Donc la
seule chose qu'il a réussi à faire en 25 ans, c'est écrire une et une
seule ligne:

goto insignifiance

Quand il déboguait, il avait un message d'erreur:

"Line not found"

Mais il ne savait pas quoi faire avec cela.

Avatar
Dédé
Heuuu encore un truc ...

Ne crois-tu pas que son site, ses applications et autre fruits qu'il
préconise ne sont que le travail commandé, ordonné, et j'en passe, de
contributeurs et autres personnes annonymes ? Donc, pas de "Chapeau..." à
lui même mais plutôt à toutes les personnes qui l'ont aidé et fait son
travail .... Donc, à TOUS LES CONTRIBUTEURS DU MPFE et autre forum où on
apprend tellement ;-)))

Vraiment chapeau à tout ceux d'entre vous que j'ai connu "Virtuellement" sur
ces quelques forum's ;-)


Dédé

"Clément Marcotte" a écrit dans le message
de news:
Bonjour,

Arrête te critiquer sur ce forum alors que, comme tu le dis, t'es
bien plus

compétent que nous avec des 25 années de prog derrière toi .


En 25 ans, il a dû être obligé d'apprendre à utiliser Goto. Donc la
seule chose qu'il a réussi à faire en 25 ans, c'est écrire une et une
seule ligne:

goto insignifiance

Quand il déboguait, il avait un message d'erreur:

"Line not found"

Mais il ne savait pas quoi faire avec cela.