bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Sub CopieFormule() Range("J2").Copy Range(Range("J3"), Cells(Range("J1").CurrentRegion.Rows.Count, 10)).PasteSpecial xlPasteFormulas End Sub
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Bonsoir,
Probablement pas le plus accadémique....
Sub CopieFormule()
Range("J2").Copy
Range(Range("J3"), Cells(Range("J1").CurrentRegion.Rows.Count,
10)).PasteSpecial xlPasteFormulas
End Sub
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de
news:ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Sub CopieFormule() Range("J2").Copy Range(Range("J3"), Cells(Range("J1").CurrentRegion.Rows.Count, 10)).PasteSpecial xlPasteFormulas End Sub
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
garnote
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à
la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule()
L = [i2].End(xlDown).Row
[j2].AutoFill Destination:=Range("j2:j" & L)
End Sub
Serge
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de news:
ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Joel
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i !
aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"garnote" <rien@absent.net> a écrit dans le message de
news:UlfGc.90739$HS3.45518@edtnps84...
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à
la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule()
L = [i2].End(xlDown).Row
[j2].AutoFill Destination:=Range("j2:j" & L)
End Sub
Serge
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de news:
ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
garnote
Ouais, tu as bien raison. Ce qui me fait penser à cette anecdote classique de l'université Laval. L'examen final d'un cours de philosophie contenait une seule question : « Qu'est-ce que le risque ? » Les étudiants avaient trois heures pour répondre à la question. Or, au bout de cinq minutes, un étudiant « Le risque, c'est ça ».
Serge
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Ouais, tu as bien raison. Ce qui me fait penser à cette
anecdote classique de l'université Laval.
L'examen final d'un cours de philosophie contenait une
seule question : « Qu'est-ce que le risque ? »
Les étudiants avaient trois heures pour répondre à la
question. Or, au bout de cinq minutes, un étudiant
« Le risque, c'est ça ».
Serge
"Joel" <joel-garbe@wanadoo.fr> a écrit dans le message de news:
ccc0et$ejg$1@news-reader1.wanadoo.fr...
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i !
aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"garnote" <rien@absent.net> a écrit dans le message de
news:UlfGc.90739$HS3.45518@edtnps84...
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à
la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule()
L = [i2].End(xlDown).Row
[j2].AutoFill Destination:=Range("j2:j" & L)
End Sub
Serge
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de
news:
ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Ouais, tu as bien raison. Ce qui me fait penser à cette anecdote classique de l'université Laval. L'examen final d'un cours de philosophie contenait une seule question : « Qu'est-ce que le risque ? » Les étudiants avaient trois heures pour répondre à la question. Or, au bout de cinq minutes, un étudiant « Le risque, c'est ça ».
Serge
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Joel
Le pire, c'est qu'il l'avait écrit en petit au bas de la dernière page !
Pour avoir un 20/20 !
Grandeur quand tu nous tiens !
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:EJfGc.90744$
Ouais, tu as bien raison. Ce qui me fait penser à cette anecdote classique de l'université Laval. L'examen final d'un cours de philosophie contenait une seule question : « Qu'est-ce que le risque ? » Les étudiants avaient trois heures pour répondre à la question. Or, au bout de cinq minutes, un étudiant « Le risque, c'est ça ».
Serge
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Le pire, c'est qu'il l'avait écrit en petit au bas de la dernière page !
Pour avoir un 20/20 !
Grandeur quand tu nous tiens !
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"garnote" <rien@absent.net> a écrit dans le message de
news:EJfGc.90744$HS3.23716@edtnps84...
Ouais, tu as bien raison. Ce qui me fait penser à cette
anecdote classique de l'université Laval.
L'examen final d'un cours de philosophie contenait une
seule question : « Qu'est-ce que le risque ? »
Les étudiants avaient trois heures pour répondre à la
question. Or, au bout de cinq minutes, un étudiant
« Le risque, c'est ça ».
Serge
"Joel" <joel-garbe@wanadoo.fr> a écrit dans le message de news:
ccc0et$ejg$1@news-reader1.wanadoo.fr...
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau
ou
même qu'il y avait quelque chose en colonne i !
aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"garnote" <rien@absent.net> a écrit dans le message de
news:UlfGc.90739$HS3.45518@edtnps84...
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à
la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule()
L = [i2].End(xlDown).Row
[j2].AutoFill Destination:=Range("j2:j" & L)
End Sub
Serge
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de
news:
ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant
le
Le pire, c'est qu'il l'avait écrit en petit au bas de la dernière page !
Pour avoir un 20/20 !
Grandeur quand tu nous tiens !
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:EJfGc.90744$
Ouais, tu as bien raison. Ce qui me fait penser à cette anecdote classique de l'université Laval. L'examen final d'un cours de philosophie contenait une seule question : « Qu'est-ce que le risque ? » Les étudiants avaient trois heures pour répondre à la question. Or, au bout de cinq minutes, un étudiant « Le risque, c'est ça ».
Serge
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Max Twinley
J'ajouterai, que le risque est toujours estimé. Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité de l'estimation.Pas avant.
à+ twinley
"garnote" a écrit dans le message de news:EJfGc.90744$
Ouais, tu as bien raison. Ce qui me fait penser à cette anecdote classique de l'université Laval. L'examen final d'un cours de philosophie contenait une seule question : « Qu'est-ce que le risque ? » Les étudiants avaient trois heures pour répondre à la question. Or, au bout de cinq minutes, un étudiant « Le risque, c'est ça ».
Serge
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
J'ajouterai, que le risque est toujours estimé.
Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité
de l'estimation.Pas avant.
à+
twinley
"garnote" <rien@absent.net> a écrit dans le message de
news:EJfGc.90744$HS3.23716@edtnps84...
Ouais, tu as bien raison. Ce qui me fait penser à cette
anecdote classique de l'université Laval.
L'examen final d'un cours de philosophie contenait une
seule question : « Qu'est-ce que le risque ? »
Les étudiants avaient trois heures pour répondre à la
question. Or, au bout de cinq minutes, un étudiant
« Le risque, c'est ça ».
Serge
"Joel" <joel-garbe@wanadoo.fr> a écrit dans le message de news:
ccc0et$ejg$1@news-reader1.wanadoo.fr...
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau
ou
même qu'il y avait quelque chose en colonne i !
aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"garnote" <rien@absent.net> a écrit dans le message de
news:UlfGc.90739$HS3.45518@edtnps84...
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à
la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule()
L = [i2].End(xlDown).Row
[j2].AutoFill Destination:=Range("j2:j" & L)
End Sub
Serge
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de
news:
ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant
le
J'ajouterai, que le risque est toujours estimé. Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité de l'estimation.Pas avant.
à+ twinley
"garnote" a écrit dans le message de news:EJfGc.90744$
Ouais, tu as bien raison. Ce qui me fait penser à cette anecdote classique de l'université Laval. L'examen final d'un cours de philosophie contenait une seule question : « Qu'est-ce que le risque ? » Les étudiants avaient trois heures pour répondre à la question. Or, au bout de cinq minutes, un étudiant « Le risque, c'est ça ».
Serge
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Frédéric Sigonneau
Bonsoir,
La plus simple, je ne sais pas, mais c'est une façon de faire :
Sub CopieFormule() Dim Formule$, derLi& derLi = Cells(Rows.Count, "A").End(xlUp).Row Formule = "=somme(A2:D2)+50" Range("J2:J" & derLi).FormulaLocal = Formule End Sub
FS --- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Bonsoir,
La plus simple, je ne sais pas, mais c'est une façon de faire :
Sub CopieFormule()
Dim Formule$, derLi&
derLi = Cells(Rows.Count, "A").End(xlUp).Row
Formule = "=somme(A2:D2)+50"
Range("J2:J" & derLi).FormulaLocal = Formule
End Sub
FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
La plus simple, je ne sais pas, mais c'est une façon de faire :
Sub CopieFormule() Dim Formule$, derLi& derLi = Cells(Rows.Count, "A").End(xlUp).Row Formule = "=somme(A2:D2)+50" Range("J2:J" & derLi).FormulaLocal = Formule End Sub
FS --- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
AV
J'ajouterai, que le risque est toujours estimé. Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité de l'estimation.Pas avant.
Quoique..... si tu sautes du dernier étage de la Tour Eiffel.... Entre l'estimation qu'on fera du résultat et la réalité, il n'y aura pas un gros écart ;-)
AV
J'ajouterai, que le risque est toujours estimé.
Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité
de l'estimation.Pas avant.
Quoique..... si tu sautes du dernier étage de la Tour Eiffel....
Entre l'estimation qu'on fera du résultat et la réalité, il n'y aura pas un gros
écart ;-)
J'ajouterai, que le risque est toujours estimé. Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité de l'estimation.Pas avant.
Quoique..... si tu sautes du dernier étage de la Tour Eiffel.... Entre l'estimation qu'on fera du résultat et la réalité, il n'y aura pas un gros écart ;-)
AV
sabatier
il a raison, alain on arrive même à une bonne estimation onomatopéique du bruit fait par le corps dans sa chute et lors de son écrasement au sol (je m'étonne même qu'AV ne l'ait pas suggéré puisque cela devrait lui rappeler quelquechose, au moins dans la première approche), du bruit donc, disais-je : zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz zzzzzzzzzzzzzz splash
sauf peut-être pour certains asiatiques où nous estimerions plutôt ainsi : chinnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn nn toc
jps (petite forme ce matin)
"AV" a écrit dans le message de news:%23$
J'ajouterai, que le risque est toujours estimé. Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité
de l'estimation.Pas avant.
Quoique..... si tu sautes du dernier étage de la Tour Eiffel.... Entre l'estimation qu'on fera du résultat et la réalité, il n'y aura pas un gros
écart ;-)
AV
il a raison, alain
on arrive même à une bonne estimation onomatopéique du bruit fait par le
corps dans sa chute et lors de son écrasement au sol (je m'étonne même qu'AV
ne l'ait pas suggéré puisque cela devrait lui rappeler quelquechose, au
moins dans la première approche), du bruit donc, disais-je :
zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz
zzzzzzzzzzzzzz splash
sauf peut-être pour certains asiatiques où nous estimerions plutôt ainsi :
chinnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn
nn toc
jps (petite forme ce matin)
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de
news:%23$l1hAyYEHA.4092@TK2MSFTNGP11.phx.gbl...
J'ajouterai, que le risque est toujours estimé.
Quand l'accident a lieu, on est enfin fixé sur la pertinence et la
réalité
de l'estimation.Pas avant.
Quoique..... si tu sautes du dernier étage de la Tour Eiffel....
Entre l'estimation qu'on fera du résultat et la réalité, il n'y aura pas
un gros
il a raison, alain on arrive même à une bonne estimation onomatopéique du bruit fait par le corps dans sa chute et lors de son écrasement au sol (je m'étonne même qu'AV ne l'ait pas suggéré puisque cela devrait lui rappeler quelquechose, au moins dans la première approche), du bruit donc, disais-je : zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz zzzzzzzzzzzzzz splash
sauf peut-être pour certains asiatiques où nous estimerions plutôt ainsi : chinnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn nn toc
jps (petite forme ce matin)
"AV" a écrit dans le message de news:%23$
J'ajouterai, que le risque est toujours estimé. Quand l'accident a lieu, on est enfin fixé sur la pertinence et la réalité
de l'estimation.Pas avant.
Quoique..... si tu sautes du dernier étage de la Tour Eiffel.... Entre l'estimation qu'on fera du résultat et la réalité, il n'y aura pas un gros
écart ;-)
AV
arnaud
Il n'y a rien dans la colonne i, j'ai tout supprimé auparavant !
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
Quelle est la macro la plus simple ??
Merci d'avance....
Arnaud
Il n'y a rien dans la colonne i,
j'ai tout supprimé auparavant !
"Joel" <joel-garbe@wanadoo.fr> a écrit dans le message de news:
ccc0et$ejg$1@news-reader1.wanadoo.fr...
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou
même qu'il y avait quelque chose en colonne i !
aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE
www.joelgarbe.fr
"garnote" <rien@absent.net> a écrit dans le message de
news:UlfGc.90739$HS3.45518@edtnps84...
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à
la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule()
L = [i2].End(xlDown).Row
[j2].AutoFill Destination:=Range("j2:j" & L)
End Sub
Serge
"arnaud" <arnaud.lamy@silverplastics.fr> a écrit dans le message de
news:
ekN1L8pYEHA.3596@tk2msftngp13.phx.gbl...
bonjour !
Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes
Je veux ajouter un champs calculé dans ma colonne J
Je met le titre en J1, puis je tape la formule en J2
Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le
nombre de lignes de mon tableau)
Il n'y a rien dans la colonne i, j'ai tout supprimé auparavant !
"Joel" a écrit dans le message de news: ccc0et$ejg$
Bonsoir Serge,
Arnaud n'a pas précisé que la colonne i était sans vide dans le tableau ou même qu'il y avait quelque chose en colonne i ! aussi la méthode me paraît-elle risquée ? 'est-elle pas ?
;-)
--
Bien cordialement,
Joël GARBE www.joelgarbe.fr "garnote" a écrit dans le message de news:UlfGc.90739$
Bonjour Arnaud,
Si, par exemple, ta formule se réfère à la cellule i2, tu pourrais essayer ceci :
Sub Copie_Formule() L = [i2].End(xlDown).Row [j2].AutoFill Destination:=Range("j2:j" & L) End Sub
Serge
"arnaud" a écrit dans le message de news:
bonjour ! Je me prend la tete sur cette macro qui doit pourtant etre simple...
J'ai une liste sur plusieurs colonnes Je veux ajouter un champs calculé dans ma colonne J Je met le titre en J1, puis je tape la formule en J2 Je veux ensuite la recopier sur la hauteur de mon tableau. (suivant le nombre de lignes de mon tableau)
