[RÉSOLU] VBA : copier / coller en valeur au bon endroit dans un autre onglet

[dionys0s]

Bonjour le forum

Pour comprendre mon problème, je suggère d'ouvrir la PJ.

Je voudrais faire une macro pour copier/coller les valeurs sur fond rouge de l'onglet "Calcul CA" directement au bon endroit de l'onglet "Alin TTC SG".
Dans le premier onglet, on voit que les valeurs concernent le mois de mars (cellule B8). Il faudrait donc que les valeurs s'insèrent d'elles même sous la cellule C2 du deuxieme onglet.

J'ai essayé avec l'enregistreur, en faisant un ctrl F, rechercher la valeur B8 du premier onglet, atteindre, retourner au premier onglet, selectionner la plage, copier, aller dans le deuxieme onglet, coller, mais quand j'execute la macro ca ne marche pas, et dans le code, il ne recherche pas la valeur de B8, mais 01/03/2009

J'aimerais avoir votre aide si possible.

D'avancer merci !

 

[dionys0s]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

C'est top ça marche nickel !
Merci beaucoup

 

[JNP]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

Bonsoir le fil 🙂,
Une toute autre possibilité

Sub test()
Dim I As Integer, C As Range
With Sheets(Range("C8").Text)
Set C = .Cells.Find(Range("B8"), LookIn:=xlFormulas, LookAt:=xlWhole)
If Not C Is Nothing Then
For I = 9 To 44
.Cells(I - 6, C.Column) = Cells(I, 3)
Next I
End If
End With
End Sub

à condition de nommer ta cellule exactement comme ton onglet.
Bon courage 😎

 

[youky(BJ)]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

Salut dionys0s,
Voici ton fichier j'ai mis un bouton en Feuil1
Active les macros
Bruno

 

[dionys0s]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

Merci beaucoup à tous ! Je vais y arriver ^^

 

[dionys0s]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

JNP j'essaie avec ton code, mais je ne comprends pas bien les valeurs à modifier si je veux adapter ton code avec la colonne D intitulée Alin TTC HSG du premier onglet (l'onglet Alin TTC HSG existe)

 

[dionys0s]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

En fait si ! J'ai compris !

Merci à tous !
JNP ton code est top ^^

 

[dionys0s]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

Euh JNP je voudrais activer la macro avec un bouton et en faisant Call la_macro dans le code du bouton et en cliquand dessus ça ne marche pas c'est normal ?
Je continue à chercher

 

[JNP]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

Re 🙂,

Euh JNP je voudrais activer la macro avec un bouton et en faisant Call la_macro dans le code du bouton et en cliquand dessus ça ne marche pas c'est normal ?
Je continue à chercher

Ma macro fait référence à la feuille active. Si ton bouton n'est pas dessus, cela pourrait expliquer le problème 😛...

Sub test()
Dim I As Integer, C As Range
With Sheets(Sheets("Calcul CA").Range("C8").Text)
Set C = .Cells.Find(Sheets("Calcul CA").Range("B8"), LookIn:=xlFormulas, LookAt:=xlWhole)
If Not C Is Nothing Then
For I = 9 To 44
.Cells(I - 6, C.Column) = Sheets("Calcul CA").Cells(I, 3)
Next I
End If
End With
End Sub

utilise la feuille nommée 😉.
Bon courage 😎

 

[dionys0s]

Re : VBA : copier / coller en valeur au bon endroit dans un autre onglet

Ben c'est bien ce que j'avais fait pourtant.
Finalement j'ai effacé mon bouton, recommencé toute la manip' et ça a marché... J'avais du oublier un underscore ou je sais pas trop quoi.

En tout cas merci bcp !

 

[Lone-wolf]

Re : [RÉSOLU] VBA : copier / coller en valeur au bon endroit dans un autre onglet

Bonsoir à tous! 😀

@JNP: Chapeau! Je l'adopte. 😱 😉


A+ 😎

 

[Lone-wolf]

Re : [RÉSOLU] VBA : copier / coller en valeur au bon endroit dans un autre onglet

Re à tous,

en PJ le fichier personnalisé.

Good Night 😎