Microsoft 365 Copier coller la valeur d'une cellule Excel

ThomasBRD

XLDnaute Nouveau
Bonjour,

Je rencontre un petit problème qui me gène beaucoup car les mots clés que je tape sur google pour chercher des solutions sont trompeurs !..

En effet, de manière très simple:

La formulation suivante permet de copier et coller une cellule dans une autres à condition que..

'Si P11 = P19 alors O13 = Q1

If Range("P11") = Range("P19") Then Range("O13").Copy Range("Q1")

Le problème est que la cellule copié (O13) est égale à une formule qui donne un résultat qui doit être utilisé dans un tableau.. et donc la cellule coller contient la formule de la cellule copié (ça ne fonctionne donc pas) alors que j'aimerais que ce soit seulement la valeur de la cellule..

Pensez-vous pouvoir résoudre ce problème ?

Merci à vous..
Thomas BERNARD
 
Solution
Bonjour Thomas,

je te laisse essayer avec cette ligne de code VBA :
VB:
If [P11] = [P19] Then [Q1] = [O13]
il y aura en Q1 seulement la valeur de O13,
pas la formule ! ;)

attention : il y a une contradiction dans ton énoncé !

* avec : 'Si P11 = P19 alors O13 = Q1, c'est Q1 qui est la cellule copiée (dans O13)

* avec : If Range("P11") = Range("P19") Then Range("O13").Copy Range("Q1")
c'est O13 qui est la cellule copiée (dans Q1)


* « Le problème est que la cellule copiée (O13) »

soan

soan

XLDnaute Barbatruc
Inactif
Bonjour Thomas,

je te laisse essayer avec cette ligne de code VBA :
VB:
If [P11] = [P19] Then [Q1] = [O13]
il y aura en Q1 seulement la valeur de O13,
pas la formule ! ;)

attention : il y a une contradiction dans ton énoncé !

* avec : 'Si P11 = P19 alors O13 = Q1, c'est Q1 qui est la cellule copiée (dans O13)

* avec : If Range("P11") = Range("P19") Then Range("O13").Copy Range("Q1")
c'est O13 qui est la cellule copiée (dans Q1)


* « Le problème est que la cellule copiée (O13) »

soan
 
Dernière édition:

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 164
Messages
2 085 877
Membres
103 007
dernier inscrit
salma_hayek