Sujet Précédent Sujet Suivant

Remplacement formule VBA

Résolu/Fermé
enark78 Messages postés 417 Date d'inscription mardi 2 février 2010 Statut Membre Dernière intervention 12 juillet 2012 - 11 févr. 2010 à 13:52
enark78 Messages postés 417 Date d'inscription mardi 2 février 2010 Statut Membre Dernière intervention 12 juillet 2012 - 11 févr. 2010 à 14:10
Bonjour, est ce que je peux remplacer mon c/c par une formule du type range("quelque chose").value=range("autrechose").value dans cette macro

Range("C1:N31").Select
Selection.Copy
Range("B1").Select
ActiveSheet.Paste

pour donner quelque chose comme ca ?
Sheets("P1").Range("N35").Value = Sheets("Stats").Range("B15").Value

Merci
A voir également:

4 réponses

Réponse 1 / 4
enark78 Messages postés 417 Date d'inscription mardi 2 février 2010 Statut Membre Dernière intervention 12 juillet 2012 17
11 févr. 2010 à 14:10
C'est bon, j'ai tout simplement essayer ca

Sheets("P1").Range("B1").Value = Sheets("P1").Range("C1:N31").Value

et ca marche. Ca me parassait trop simple mais non, merci.
1
Réponse 2 / 4
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 757
11 févr. 2010 à 13:58
Bonjour,
As tu essayé?
Si oui : cela fonctionne?
Si oui : pourquoi poser la question?
Si non : Ou cela bugge t'il?
Si non : pourquoi n'essaye tu pas?
0
Réponse 3 / 4
enark78 Messages postés 417 Date d'inscription mardi 2 février 2010 Statut Membre Dernière intervention 12 juillet 2012 17
11 févr. 2010 à 14:02
Je suis dans le cas du "non". Je n'ai pas essayé car je ne vois pas comment adapter la synthaxe pour selectionner plusieurs lignes et colonnes.
0
Réponse 4 / 4
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 757
11 févr. 2010 à 14:09
Alors essaye quelque chose comme ceci (à adapter à ton cas bien sur) : 

Sheets("P1").Range("A1:N35").Value = Sheets("Stats").Range("B1:O35").Value

0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop


a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

2 réponses
Décalage de formule
nathan01983 -
via55 -

Bonjour à toutes et à tous Je sollicite votre aide, j'aimerai dans un tableau Excel recopier une formule.
Je m'explique je voudrai que quand je met un "X" dans la cellule H9, je voudrais que toutes les 4 cellules un "X" apparaisse.
Le 4 étant une valeur que je récupère dans le cellule G9 (bien sur la valeur de celle ci peut changer).
Après je compte étendre à toutes les lignes car la périodicité changera à toutes les lignes.
Je sais pas si je suis très clair lol Merci tout de même de votre aide. 

12 réponses