Remplacement formule VBA

Résolu
enark78 Messages postés 491 Statut Membre -  
enark78 Messages postés 491 Statut Membre -
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
Configuration: Windows XP Internet Explorer 6.0

4 réponses

  1. enark78 Messages postés 491 Statut Membre 17
     
    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
  2. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    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
  3. enark78 Messages postés 491 Statut Membre 17
     
    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
  4. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Alors essaye quelque chose comme ceci (à adapter à ton cas bien sur) :

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

    0