A voir également:
- Formule cellule
- Formule si et - Guide
- Formule excel pour additionner plusieurs cellules - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Formule mathématique - Télécharger - Études & Formations
- Bloquer cellule formule excel - Guide
9 réponses
Bonjour Aksaid, bonjour le forum,
Pour connaître la variable valeur, dernière ligne éditée des onglets Feuil1 et Feuil2 d'accord... Mais dans quelle colonne ?!...
Pour connaître la variable valeur, dernière ligne éditée des onglets Feuil1 et Feuil2 d'accord... Mais dans quelle colonne ?!...
pour plus de précisions,j'ai répété plusieurs fois les lignes:
Sheets("Feuil2").Range("C" & derniereLigneFeuil2).FormulaR1C1 = "=Feuil1!R[valeur]C"
Sheets("Feuil2").Range("D" & derniereLigneFeuil2).FormulaR1C1 = "=Feuil1!R[valeur]C"
Sheets("Feuil2").Range("E" & derniereLigneFeuil2).FormulaR1C1 = "=Feuil1!R[valeur]C"
Sheets("Feuil2").Range("C" & derniereLigneFeuil2).FormulaR1C1 = "=Feuil1!R[valeur]C"
Sheets("Feuil2").Range("D" & derniereLigneFeuil2).FormulaR1C1 = "=Feuil1!R[valeur]C"
Sheets("Feuil2").Range("E" & derniereLigneFeuil2).FormulaR1C1 = "=Feuil1!R[valeur]C"
Relis ma question car tu n'y réponds toujours pas...
Valeur = dernière cellule éditée de l'onglet Feuil2 dans quelle colonne (?) - dernière cellule éditée de l'onglet Feuil1 dans quelle colonne (?)
Valeur = dernière cellule éditée de l'onglet Feuil2 dans quelle colonne (?) - dernière cellule éditée de l'onglet Feuil1 dans quelle colonne (?)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
d'près les lignes:
Range("C" & derniereLigneFeuil2) donc colonne C et c'est la même pour feuille1
Range("C" & derniereLigneFeuil2) donc colonne C et c'est la même pour feuille1
.......etc
Range("C" & derniereLigneFeuil2) donc colonne C et c'est la même pour feuille1
Range("C" & derniereLigneFeuil2) donc colonne C et c'est la même pour feuille1
.......etc
je ne sais pas,mais peut être tu veux parler de ça:
derniereLigneFeuil2 = Sheets("Feuil2").Cells(Rows.Count, 1).End(xlUp).Row + 1
derniereLigneFeuil2 = Sheets("Feuil2").Cells(Rows.Count, 1).End(xlUp).Row + 1
Peut-être comme ça :
Sub Macro1()
Dim DL1 As Integer
Dim DL2 As Integer
Dim VALeur As Integer
DL1 = Sheets("Feuil1").Range("A" & Application.Rows.Count).End(xlUp).Value 'dernière ligne éditée de la colonne A de l'onglet Feuil1
DL2 = Sheets("Feuil2").Range("A" & Application.Rows.Count).End(xlUp).Value 'dernière ligne éditée de la colonne A de l'onglet Feuil2
VALeur = DL2 - DL1
Sheets("Feuil2").Range("C" & Application.Rows.Count).End(xlUp).FormulaR1C1 = "=Feuil1!R[" & VALeur & "]C"
End Sub