OVH Cloud OVH Cloud

svp

3 réponses
Avatar
AZERT21
je suis un n=E9ophyte et je voudrais demander comment=20
=E9crire la macrosuivante qui somme toute est=20
simple: "reporter les valeurs communes aux colonnes A et=20
B en colonne C"
merci

3 réponses

Avatar
Arghhhh....
Guten Tag,
Drei Nachrichten für dieselbe Frage, die der Wortlaut
jedesmal wechselt,
Das ist wirklich das Zeichen eines Neubekehrten!!!!

Know young greenhorn that on this forum, we like the
clearly exposed(explained) questions
As well as the respect for the elementary régles of
politeness and courtesy.

Así como la última formulación parece más seria,
¡ He aquí el código correspondiente qué está bien! ¡!!

Proced azert21()
nbl = [A1].RegiónActual.Filas.Cuenta
Para i = 1 Al nbl
Si Celdas(i; 1).Valor = Celdas(i; 2).Valor Entonces
Celdas(i; 3).Valor = Celdas(i; 1).Valor
Fin Si
Siguiente
Fin Proced


Bescheiden, noch eine Woche, die verspricht!

@+



-----Message d'origine-----
je suis un néophyte et je voudrais demander comment
écrire la macrosuivante qui somme toute est
simple: "reporter les valeurs communes aux colonnes A et
B en colonne C"
merci
.



Avatar
sabatier
ojala! arghhhhh
sin querer caer en una cualquier polémica, me parece que seria mejor
escribir así :
Si Celdas(i, 1).Valor = Celdas(i, 2).Valor Entonces
Celdas(i, 3).Valor = Celdas(i, 1).Valor
es decir una , en vez de un ;

pero lo que mas me sorprende es que se escribe el VBA en
castellano...milagro divino o qué otro????
jps

Guten Tag,

Drei Nachrichten für dieselbe Frage, die der Wortlaut
jedesmal wechselt,
Das ist wirklich das Zeichen eines Neubekehrten!!!!

Know young greenhorn that on this forum, we like the
clearly exposed(explained) questions
As well as the respect for the elementary régles of
politeness and courtesy.

Así como la última formulación parece más seria,
¡ He aquí el código correspondiente qué está bien! ¡!!

Proced azert21()
nbl = [A1].RegiónActual.Filas.Cuenta
Para i = 1 Al nbl
Si Celdas(i; 1).Valor = Celdas(i; 2).Valor Entonces
Celdas(i; 3).Valor = Celdas(i; 1).Valor
Fin Si
Siguiente
Fin Proced

Bescheiden, noch eine Woche, die verspricht!

@+

-----Message d'origine-----
je suis un néophyte et je voudrais demander comment
écrire la macrosuivante qui somme toute est
simple: "reporter les valeurs communes aux colonnes A et
B en colonne C"
merci
.





Avatar
Arghhh...
Ach!!! Meine guten Jean-Paul....
Es, was erstaunlicher gewesen war, ging darum, daß ich das
azerghii schrieb!!!
Bescheiden habe ich kein entsprechendes Wörterbuch
:-(
@+

-----Message d'origine-----
ojala! arghhhhh
sin querer caer en una cualquier polémica, me parece que
seria mejor

escribir así :
Si Celdas(i, 1).Valor = Celdas(i, 2).Valor Entonces
Celdas(i, 3).Valor = Celdas(i, 1).Valor
es decir una , en vez de un ;

pero lo que mas me sorprende es que se escribe el VBA en
castellano...milagro divino o qué otro????
jps

Guten Tag,

Drei Nachrichten für dieselbe Frage, die der Wortlaut
jedesmal wechselt,
Das ist wirklich das Zeichen eines Neubekehrten!!!!

Know young greenhorn that on this forum, we like the
clearly exposed(explained) questions
As well as the respect for the elementary régles of
politeness and courtesy.

Así como la última formulación parece más seria,
¡ He aquí el código correspondiente qué está bien! ¡!!

Proced azert21()
nbl = [A1].RegiónActual.Filas.Cuenta
Para i = 1 Al nbl
Si Celdas(i; 1).Valor = Celdas(i; 2).Valor Entonces
Celdas(i; 3).Valor = Celdas(i; 1).Valor
Fin Si
Siguiente
Fin Proced

Bescheiden, noch eine Woche, die verspricht!

@+

-----Message d'origine-----
je suis un néophyte et je voudrais demander comment
écrire la macrosuivante qui somme toute est
simple: "reporter les valeurs communes aux colonnes A
et



B en colonne C"
merci
.

.