il y a longtemps... j'arrivais à mettre 2 champs de lignes cote à cote sur 2
colonnes (même ligne),
aujourd'hui les TCD ont beaucoup changés, est ce que cela est toujours possible ?
si oui, quel la manipulation à faire ?
merci! pour ce coup de jeunesse, j'en ai bien besoin pour me dépaitrer de ces fichu TCD, il met une partie du champ de ligne "Vt" en format monétaire et l'autre partie en format numérique mais d'où peut bien venir ce format monétaire qui se met automatique ?
isabelle
Le 2016-02-08 06:11, DanielCo a écrit :
Pas de souci. D'après mon fils, ne pas faire de faute est un "marqueur générationnel" (en clair, la marque des vieux c...). Daniel
Le 2016-02-08 05:37, Jacquouille a écrit :
Salut Isabelle Te tracasse pas. Tant en France qu'en Belgique, la mode est à la réforme ortografique! Un waso ...... tu es donc "in".
Jacques
oups, j'en perd
Le 2016-02-07 22:20, isabelle a écrit :
je pers
salut à vous deux,
merci! pour ce coup de jeunesse,
j'en ai bien besoin pour me dépaitrer de ces fichu TCD,
il met une partie du champ de ligne "Vt" en format monétaire
et l'autre partie en format numérique
mais d'où peut bien venir ce format monétaire qui se met automatique ?
isabelle
Le 2016-02-08 06:11, DanielCo a écrit :
Pas de souci. D'après mon fils, ne pas faire de faute est un "marqueur
générationnel" (en clair, la marque des vieux c...).
Daniel
Le 2016-02-08 05:37, Jacquouille a écrit :
Salut Isabelle
Te tracasse pas. Tant en France qu'en Belgique, la mode est à la réforme
ortografique!
Un waso ......
tu es donc "in".
merci! pour ce coup de jeunesse, j'en ai bien besoin pour me dépaitrer de ces fichu TCD, il met une partie du champ de ligne "Vt" en format monétaire et l'autre partie en format numérique mais d'où peut bien venir ce format monétaire qui se met automatique ?
isabelle
Le 2016-02-08 06:11, DanielCo a écrit :
Pas de souci. D'après mon fils, ne pas faire de faute est un "marqueur générationnel" (en clair, la marque des vieux c...). Daniel
Le 2016-02-08 05:37, Jacquouille a écrit :
Salut Isabelle Te tracasse pas. Tant en France qu'en Belgique, la mode est à la réforme ortografique! Un waso ...... tu es donc "in".
Jacques
oups, j'en perd
Le 2016-02-07 22:20, isabelle a écrit :
je pers
MichD
Voici ton fichier Isabelle avec des formats de cellules qui vont bien!
http://www.cjoint.com/c/FBiustMKSXX
C'est toujours un plaisir de travailler avec des TDC quand ce n'est pas les nôtres!!! ;-))
N.B. Tu m'avais proposé un logiciel pour effectuer les corrections en langue anglaise. La nouvelle version d'Antidote (9 V2) fait maintenant ce travail en français et en anglais. C'est too much!
MichD
Voici ton fichier Isabelle avec des formats de cellules
qui vont bien!
http://www.cjoint.com/c/FBiustMKSXX
C'est toujours un plaisir de travailler avec des TDC quand
ce n'est pas les nôtres!!! ;-))
N.B. Tu m'avais proposé un logiciel pour effectuer les corrections en
langue anglaise. La nouvelle version d'Antidote (9 V2) fait maintenant
ce travail en français et en anglais. C'est too much!
Voici ton fichier Isabelle avec des formats de cellules qui vont bien!
http://www.cjoint.com/c/FBiustMKSXX
C'est toujours un plaisir de travailler avec des TDC quand ce n'est pas les nôtres!!! ;-))
N.B. Tu m'avais proposé un logiciel pour effectuer les corrections en langue anglaise. La nouvelle version d'Antidote (9 V2) fait maintenant ce travail en français et en anglais. C'est too much!
MichD
MichD
Je spécifie que je travaille à partir d'une version française d'Excel.
Je spécifie que je travaille à partir d'une version française d'Excel.
Je spécifie que je travaille à partir d'une version française d'Excel.
MichD
La petite macro dans ton fichier devrait aussi s'écrire comme ceci :
'---------------------------------- Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable) Dim Pf As PivotField, Rg As Range For Each Pf In Target.PivotFields Select Case UCase(Pf.Name) 'Le nom des différents à formater Case Is = "P1", "P2", "A1", "A2" Set Rg = Pf.DataRange Rg.NumberFormat = "[>0]_(* #,##0.00"" $"";" & _ "_(* (#,##0.00"" $"");_(* ""-""??_);" End Select Next End Sub '----------------------------------
La petite macro dans ton fichier devrait aussi s'écrire comme ceci :
'----------------------------------
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim Pf As PivotField, Rg As Range
For Each Pf In Target.PivotFields
Select Case UCase(Pf.Name)
'Le nom des différents à formater
Case Is = "P1", "P2", "A1", "A2"
Set Rg = Pf.DataRange
Rg.NumberFormat = "[>0]_(* #,##0.00"" $"";" & _
"_(* (#,##0.00"" $"");_(* ""-""??_);"
End Select
Next
End Sub
'----------------------------------
La petite macro dans ton fichier devrait aussi s'écrire comme ceci :
'---------------------------------- Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable) Dim Pf As PivotField, Rg As Range For Each Pf In Target.PivotFields Select Case UCase(Pf.Name) 'Le nom des différents à formater Case Is = "P1", "P2", "A1", "A2" Set Rg = Pf.DataRange Rg.NumberFormat = "[>0]_(* #,##0.00"" $"";" & _ "_(* (#,##0.00"" $"");_(* ""-""??_);" End Select Next End Sub '----------------------------------
isabelle
merci! Denis, c'est parfait, plus besoins de passer par un 2ème tableau au format texte, j'suis bien contente que ce soit un plaisir pour toi de travailler avec des TDC quand ce n'est pas les tiens!!! ;-) isabelle
Le 2016-02-08 15:56, MichD a écrit :
La petite macro dans ton fichier devrait aussi s'écrire comme ceci :
'---------------------------------- Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable) Dim Pf As PivotField, Rg As Range For Each Pf In Target.PivotFields Select Case UCase(Pf.Name) 'Le nom des différents à formater Case Is = "P1", "P2", "A1", "A2" Set Rg = Pf.DataRange Rg.NumberFormat = "[>0]_(* #,##0.00"" $"";" & _ "_(* (#,##0.00"" $"");_(* ""-""??_);" End Select Next End Sub '----------------------------------
merci! Denis,
c'est parfait, plus besoins de passer par un 2ème tableau au format texte,
j'suis bien contente que ce soit un plaisir pour toi de travailler avec des TDC
quand ce n'est pas les tiens!!! ;-)
isabelle
Le 2016-02-08 15:56, MichD a écrit :
La petite macro dans ton fichier devrait aussi s'écrire comme ceci :
'----------------------------------
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim Pf As PivotField, Rg As Range
For Each Pf In Target.PivotFields
Select Case UCase(Pf.Name)
'Le nom des différents à formater
Case Is = "P1", "P2", "A1", "A2"
Set Rg = Pf.DataRange
Rg.NumberFormat = "[>0]_(* #,##0.00"" $"";" & _
"_(* (#,##0.00"" $"");_(* ""-""??_);"
End Select
Next
End Sub
'----------------------------------
merci! Denis, c'est parfait, plus besoins de passer par un 2ème tableau au format texte, j'suis bien contente que ce soit un plaisir pour toi de travailler avec des TDC quand ce n'est pas les tiens!!! ;-) isabelle
Le 2016-02-08 15:56, MichD a écrit :
La petite macro dans ton fichier devrait aussi s'écrire comme ceci :
'---------------------------------- Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable) Dim Pf As PivotField, Rg As Range For Each Pf In Target.PivotFields Select Case UCase(Pf.Name) 'Le nom des différents à formater Case Is = "P1", "P2", "A1", "A2" Set Rg = Pf.DataRange Rg.NumberFormat = "[>0]_(* #,##0.00"" $"";" & _ "_(* (#,##0.00"" $"");_(* ""-""??_);" End Select Next End Sub '----------------------------------
MichD
j'suis bien contente que ce soit un plaisir pour toi de travailler avec des TDC quand ce n'est pas les tiens!!! ;-)
C'est simplement parce qu'on peut abdiquer plus facilement quand c'est le problème des autres! ;-)
MichD
j'suis bien contente que ce soit un plaisir pour toi de travailler avec
des TDC quand ce n'est pas les tiens!!! ;-)
C'est simplement parce qu'on peut abdiquer plus facilement quand c'est
le problème des autres! ;-)
