Bonjour et merci pour votre aide.
Voila, je cherche à copier en plus de sa valeur le format d'une cellule dans
une autre.
A priori Excel ne comporte pas de formule qui permette de le faire.
Je pense qu'il est donc possible de le faire par la création d'une Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe
qui permette de copier le format d'une cellule dans une autre.
J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size
y = Cellule.Font.Bold
z = Cellule.Font.Italic
MàJ_Format.Font.Size = x
MàJ_Format.Font.Bold = y
MàJ_Format.Font.Italic = z
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JEAN-PAUL
Salut, Pourquoi ne pas utiliser le "copier-collage spécial - format" JP
"Manic Miner" a écrit dans le message de news:
Bonjour et merci pour votre aide. Voila, je cherche à copier en plus de sa valeur le format d'une cellule dans
une autre. A priori Excel ne comporte pas de formule qui permette de le faire. Je pense qu'il est donc possible de le faire par la création d'une Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe qui permette de copier le format d'une cellule dans une autre. J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size y = Cellule.Font.Bold z = Cellule.Font.Italic
MàJ_Format.Font.Size = x MàJ_Format.Font.Bold = y MàJ_Format.Font.Italic = z
End Function
Comment faire ?
Merci
Salut,
Pourquoi ne pas utiliser le "copier-collage spécial - format"
JP
"Manic Miner" <ManicMiner@discussions.microsoft.com> a écrit dans le message
de news: 59414E27-B397-4B7F-8EAE-899B0A85BB62@microsoft.com...
Bonjour et merci pour votre aide.
Voila, je cherche à copier en plus de sa valeur le format d'une cellule
dans
une autre.
A priori Excel ne comporte pas de formule qui permette de le faire.
Je pense qu'il est donc possible de le faire par la création d'une
Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe
qui permette de copier le format d'une cellule dans une autre.
J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size
y = Cellule.Font.Bold
z = Cellule.Font.Italic
MàJ_Format.Font.Size = x
MàJ_Format.Font.Bold = y
MàJ_Format.Font.Italic = z
Salut, Pourquoi ne pas utiliser le "copier-collage spécial - format" JP
"Manic Miner" a écrit dans le message de news:
Bonjour et merci pour votre aide. Voila, je cherche à copier en plus de sa valeur le format d'une cellule dans
une autre. A priori Excel ne comporte pas de formule qui permette de le faire. Je pense qu'il est donc possible de le faire par la création d'une Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe qui permette de copier le format d'une cellule dans une autre. J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size y = Cellule.Font.Bold z = Cellule.Font.Italic
MàJ_Format.Font.Size = x MàJ_Format.Font.Bold = y MàJ_Format.Font.Italic = z
End Function
Comment faire ?
Merci
AV
| Je pense qu'il est donc possible de le faire par la création d'une Fonction
Une fonction ne peut que renvoyer un résultat !
AV
| Je pense qu'il est donc possible de le faire par la création d'une Fonction
Bonjour et merci pour votre aide. Voila, je cherche à copier en plus de sa valeur le format d'une cellule dans
une autre. A priori Excel ne comporte pas de formule qui permette de le faire.
Le copier-coller classique recopie &galement les formats
Cordialement,
-- LR
Manic Miner
Parce que je souhaite que lorque le format de la cellule origine change alors le format de la cellule image change également. De la méme façon que pour une valeur avec la formule (²) par exemple. Merci
Salut, Pourquoi ne pas utiliser le "copier-collage spécial - format" JP
"Manic Miner" a écrit dans le message de news:
Bonjour et merci pour votre aide. Voila, je cherche à copier en plus de sa valeur le format d'une cellule dans
une autre. A priori Excel ne comporte pas de formule qui permette de le faire. Je pense qu'il est donc possible de le faire par la création d'une Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe qui permette de copier le format d'une cellule dans une autre. J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size y = Cellule.Font.Bold z = Cellule.Font.Italic
MàJ_Format.Font.Size = x MàJ_Format.Font.Bold = y MàJ_Format.Font.Italic = z
End Function
Comment faire ?
Merci
Parce que je souhaite que lorque le format de la cellule origine change alors
le format de la cellule image change également. De la méme façon que pour une
valeur avec la formule (²) par exemple.
Merci
Salut,
Pourquoi ne pas utiliser le "copier-collage spécial - format"
JP
"Manic Miner" <ManicMiner@discussions.microsoft.com> a écrit dans le message
de news: 59414E27-B397-4B7F-8EAE-899B0A85BB62@microsoft.com...
Bonjour et merci pour votre aide.
Voila, je cherche à copier en plus de sa valeur le format d'une cellule
dans
une autre.
A priori Excel ne comporte pas de formule qui permette de le faire.
Je pense qu'il est donc possible de le faire par la création d'une
Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe
qui permette de copier le format d'une cellule dans une autre.
J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size
y = Cellule.Font.Bold
z = Cellule.Font.Italic
MàJ_Format.Font.Size = x
MàJ_Format.Font.Bold = y
MàJ_Format.Font.Italic = z
Parce que je souhaite que lorque le format de la cellule origine change alors le format de la cellule image change également. De la méme façon que pour une valeur avec la formule (²) par exemple. Merci
Salut, Pourquoi ne pas utiliser le "copier-collage spécial - format" JP
"Manic Miner" a écrit dans le message de news:
Bonjour et merci pour votre aide. Voila, je cherche à copier en plus de sa valeur le format d'une cellule dans
une autre. A priori Excel ne comporte pas de formule qui permette de le faire. Je pense qu'il est donc possible de le faire par la création d'une Fonction
VBA, mais la ou le bat blesse c'est que je n'arrive pas ecrire la synthaxe qui permette de copier le format d'une cellule dans une autre. J'ai essayé ceci mais cela ne marche pas
Function MàJ_Format(Cellule As Range)
Application.Volatile
MàJ_Format = Cellule.Value
x = Cellule.Font.Size y = Cellule.Font.Bold z = Cellule.Font.Italic
MàJ_Format.Font.Size = x MàJ_Format.Font.Bold = y MàJ_Format.Font.Italic = z
