Répondre à la discussion
Affichage des résultats 1 à 2 sur 2

Problème macro



  1. #1
    morgane1111

    Problème macro


    ------

    Bonjour à tous,
    Alors voilà je tente de créer une macro elle ressemble à ça:
    Code:
    Sub macro()
    
    
    Dim maValeur As String, monChemin As Long, monFichier As String, maFeuille As String, adressRng As String
    Dim Dercol As Variant, Dercol2 As Variant, maValeur2 As String
    Dim i As Integer, j As Integer
    
    Workbooks.Open ("G:\ECHANGE\Morgane\macro2\Tableau_de_bord_Régional2.xls")
    Dercol2 = Workbooks("Tableau_de_bord_Régional2.xls").Worksheets("1-Tableau de bord").Cells(10, Cells.Columns.Count).End(xlToLeft).Column
    Dercol = Workbooks("Tableau Indicateur 20142.xlsm").Worksheets("pilotage par processus").Cells(7, Cells.Columns.Count).End(xlToLeft).Column
    
    Workbooks("Tableau Indicateur 20142.xlsm").Activate
     
         
    For i = K To Dercol
    maValeur = Workbooks("Tableau Indicateur 20142.xlsm").Worksheets("pilotage par processus").Range("7" & i).Value    
        For j = H To Dercol2
    maValeur2 = Workbooks("Tableau_de_bord_Régional2.xls").Worksheets("1-Tableau de bord").Range("10" & j).Value
    
                
                If maValeur = maValeur2 Then
               
    Workbooks("Tableau Indicateur 20142.xlsm").Worksheets("pilotage par processus").Rows("9" & i).Value = Workbooks("Tableau_de_bord_Régional2.xls").Worksheets("1-Tableau de bord").Rows("12" & j).Value
    
                End If
        Next j
    Next i
    
    
    End Sub
    Donc quand j'execute tout ça j'ai une erreur 1004 qui apparait dans la phrase qui se trouve après le premier For.
    Je pense que c'est dù au fait que je ne dois pas utiliser le terme Range dans la partie Range("7" & i). L'idée que je veux faire passer c'est que ma valeur se trouve sur la ligne 7 à partir de la colonne K jusqu'à la dernière colonne.

    Merci d'avance

    -----
    Dernière modification par JPL ; 25/09/2014 à 13h57. Motif: Ajout de la balise Code (#) pour garder l'indentation

  2. #2
    frederic46000

    Re : Problème macro

    bonjour morgane
    il suffit de remplacer la fonction range par cells.
    ce qui donne
    cells(7,i).value

    a+

    Fred.
    Je sais que je ne sais rien. (SOCRATE)

Discussions similaires

  1. macro dans une macro pour un microcontrôleur Pic
    Par arzew dans le forum Électronique
    Réponses: 16
    Dernier message: 19/04/2014, 19h00
  2. probleme de macro sous CATIA
    Par paaat dans le forum Technologies
    Réponses: 0
    Dernier message: 09/12/2010, 16h19
  3. Problème Macro Excel
    Par ptigone dans le forum Logiciel - Software - Open Source
    Réponses: 1
    Dernier message: 29/09/2010, 06h11
  4. Macro vba et solveur excel : problème
    Par peyo54 dans le forum Logiciel - Software - Open Source
    Réponses: 1
    Dernier message: 26/03/2009, 16h25
  5. Problème de macro sous powerpoint
    Par idaho444 dans le forum Logiciel - Software - Open Source
    Réponses: 0
    Dernier message: 24/12/2007, 18h55
Découvrez nos comparatifs produits sur l'informatique et les technologies.