Mon problème est le suivant. Après avoir copier/coller des données d'une
requête Access vers une feuille Excel, j'ai modifié le format des cellules
d'une des colonnes. Maintenant, pour voir afficher ces changements de format,
je dois double cliquer sur chacune des cellules pour voir apparaître le
nouveau format appliqué, car le changement n'apparaît pas automatiquement.
Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
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
Benead
Bonsoir DexterV
Tu peux le faire manuellement de cette façon : 1) dans une cellule vierge, tu mets la valeur 1 puis tu copie la cellule 2) tu sélectionnes la plage de la première feuille (il est possible de sélectionner plusieurs feuilles)/clic droit/Collage spécial 3) tu sélectionnes multiplication puis Ok
Attention si tu as des formules, cela ajoute *1 dans la cellule, de même, si tu as des cellule vides, cela te mettra "1"
Sinon, utilise cette macro en l'adaptant à tes besoins :
' *********** Sub RecupFormat() Dim Sh As Worksheet, Cellule As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual
For Each Sh In ThisWorkbook.Sheets For Each Cellule In Sh.UsedRange.Cells Cellule = Cellule.Value Next Cellule Next Sh
Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub ' *********** A+ Benead XL97
DexterV a écrit:
Bonjour,
Mon problème est le suivant. Après avoir copier/coller des données d'une requête Access vers une feuille Excel, j'ai modifié le format des cellules d'une des colonnes. Maintenant, pour voir afficher ces changements de format, je dois double cliquer sur chacune des cellules pour voir apparaître le nouveau format appliqué, car le changement n'apparaît pas automatiquement. Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
Quelqu'un a une idée?
Merci
Bonsoir DexterV
Tu peux le faire manuellement de cette façon :
1) dans une cellule vierge, tu mets la valeur 1 puis tu copie la cellule
2) tu sélectionnes la plage de la première feuille (il est possible de sélectionner plusieurs feuilles)/clic
droit/Collage spécial
3) tu sélectionnes multiplication puis Ok
Attention si tu as des formules, cela ajoute *1 dans la cellule, de même, si tu as des cellule vides, cela te mettra "1"
Sinon, utilise cette macro en l'adaptant à tes besoins :
' ***********
Sub RecupFormat()
Dim Sh As Worksheet, Cellule As Range
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each Sh In ThisWorkbook.Sheets
For Each Cellule In Sh.UsedRange.Cells
Cellule = Cellule.Value
Next Cellule
Next Sh
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
' ***********
A+
Benead
XL97
DexterV a écrit:
Bonjour,
Mon problème est le suivant. Après avoir copier/coller des données d'une
requête Access vers une feuille Excel, j'ai modifié le format des cellules
d'une des colonnes. Maintenant, pour voir afficher ces changements de format,
je dois double cliquer sur chacune des cellules pour voir apparaître le
nouveau format appliqué, car le changement n'apparaît pas automatiquement.
Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
Tu peux le faire manuellement de cette façon : 1) dans une cellule vierge, tu mets la valeur 1 puis tu copie la cellule 2) tu sélectionnes la plage de la première feuille (il est possible de sélectionner plusieurs feuilles)/clic droit/Collage spécial 3) tu sélectionnes multiplication puis Ok
Attention si tu as des formules, cela ajoute *1 dans la cellule, de même, si tu as des cellule vides, cela te mettra "1"
Sinon, utilise cette macro en l'adaptant à tes besoins :
' *********** Sub RecupFormat() Dim Sh As Worksheet, Cellule As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual
For Each Sh In ThisWorkbook.Sheets For Each Cellule In Sh.UsedRange.Cells Cellule = Cellule.Value Next Cellule Next Sh
Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub ' *********** A+ Benead XL97
DexterV a écrit:
Bonjour,
Mon problème est le suivant. Après avoir copier/coller des données d'une requête Access vers une feuille Excel, j'ai modifié le format des cellules d'une des colonnes. Maintenant, pour voir afficher ces changements de format, je dois double cliquer sur chacune des cellules pour voir apparaître le nouveau format appliqué, car le changement n'apparaît pas automatiquement. Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
Quelqu'un a une idée?
Merci
DexterV
Merci Benead,
C'est génial !!
Bonsoir DexterV
Tu peux le faire manuellement de cette façon : 1) dans une cellule vierge, tu mets la valeur 1 puis tu copie la cellule 2) tu sélectionnes la plage de la première feuille (il est possible de sélectionner plusieurs feuilles)/clic droit/Collage spécial 3) tu sélectionnes multiplication puis Ok
Attention si tu as des formules, cela ajoute *1 dans la cellule, de même, si tu as des cellule vides, cela te mettra "1"
Sinon, utilise cette macro en l'adaptant à tes besoins :
' *********** Sub RecupFormat() Dim Sh As Worksheet, Cellule As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual
For Each Sh In ThisWorkbook.Sheets For Each Cellule In Sh.UsedRange.Cells Cellule = Cellule.Value Next Cellule Next Sh
Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub ' *********** A+ Benead XL97
DexterV a écrit:
Bonjour,
Mon problème est le suivant. Après avoir copier/coller des données d'une requête Access vers une feuille Excel, j'ai modifié le format des cellules d'une des colonnes. Maintenant, pour voir afficher ces changements de format, je dois double cliquer sur chacune des cellules pour voir apparaître le nouveau format appliqué, car le changement n'apparaît pas automatiquement. Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
Quelqu'un a une idée?
Merci
Merci Benead,
C'est génial !!
Bonsoir DexterV
Tu peux le faire manuellement de cette façon :
1) dans une cellule vierge, tu mets la valeur 1 puis tu copie la cellule
2) tu sélectionnes la plage de la première feuille (il est possible de sélectionner plusieurs feuilles)/clic
droit/Collage spécial
3) tu sélectionnes multiplication puis Ok
Attention si tu as des formules, cela ajoute *1 dans la cellule, de même, si tu as des cellule vides, cela te mettra "1"
Sinon, utilise cette macro en l'adaptant à tes besoins :
' ***********
Sub RecupFormat()
Dim Sh As Worksheet, Cellule As Range
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each Sh In ThisWorkbook.Sheets
For Each Cellule In Sh.UsedRange.Cells
Cellule = Cellule.Value
Next Cellule
Next Sh
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
' ***********
A+
Benead
XL97
DexterV a écrit:
Bonjour,
Mon problème est le suivant. Après avoir copier/coller des données d'une
requête Access vers une feuille Excel, j'ai modifié le format des cellules
d'une des colonnes. Maintenant, pour voir afficher ces changements de format,
je dois double cliquer sur chacune des cellules pour voir apparaître le
nouveau format appliqué, car le changement n'apparaît pas automatiquement.
Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
Tu peux le faire manuellement de cette façon : 1) dans une cellule vierge, tu mets la valeur 1 puis tu copie la cellule 2) tu sélectionnes la plage de la première feuille (il est possible de sélectionner plusieurs feuilles)/clic droit/Collage spécial 3) tu sélectionnes multiplication puis Ok
Attention si tu as des formules, cela ajoute *1 dans la cellule, de même, si tu as des cellule vides, cela te mettra "1"
Sinon, utilise cette macro en l'adaptant à tes besoins :
' *********** Sub RecupFormat() Dim Sh As Worksheet, Cellule As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual
For Each Sh In ThisWorkbook.Sheets For Each Cellule In Sh.UsedRange.Cells Cellule = Cellule.Value Next Cellule Next Sh
Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub ' *********** A+ Benead XL97
DexterV a écrit:
Bonjour,
Mon problème est le suivant. Après avoir copier/coller des données d'une requête Access vers une feuille Excel, j'ai modifié le format des cellules d'une des colonnes. Maintenant, pour voir afficher ces changements de format, je dois double cliquer sur chacune des cellules pour voir apparaître le nouveau format appliqué, car le changement n'apparaît pas automatiquement. Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
Quelqu'un a une idée?
Merci
tipsy
Le mercredi 08 Décembre 2004 à 22:01 par DexterV :
Bonjour, Mon problème est le suivant. Après avoir copier/coller des données d'une requête Access vers une feuille Excel, j'ai modifié le format des cellules d'une des colonnes. Maintenant, pour voir afficher ces changements de format, je dois double cliquer sur chacune des cellules pour voir apparaître le nouveau format appliqué, car le changement n'apparaît pas automatiquement. Avec six feuilles de 2500 lignes chacune, ça devient plutôt long. Quelqu'un a une idée? Merci
Bonjour, J'ai le même problème mais mes cellule sont en format horaire. je suis obligé de double cliquer sur chaque cellule pour pouvoir les traiter mais si j'utilise la formule collage spécial "x1" ça m'enlève le format horaire... Merci de votre aide
Le mercredi 08 Décembre 2004 à 22:01 par DexterV :
> Bonjour,
>
> Mon problème est le suivant. Après avoir copier/coller des
> données d'une
> requête Access vers une feuille Excel, j'ai modifié le format des
> cellules
> d'une des colonnes. Maintenant, pour voir afficher ces changements de format,
> je dois double cliquer sur chacune des cellules pour voir apparaître le
> nouveau format appliqué, car le changement n'apparaît pas
> automatiquement.
> Avec six feuilles de 2500 lignes chacune, ça devient plutôt long.
>
> Quelqu'un a une idée?
>
> Merci
Bonjour,
J'ai le même problème mais mes cellule sont en format horaire.
je suis obligé de double cliquer sur chaque cellule pour pouvoir les traiter mais si j'utilise la formule collage spécial "x1" ça m'enlève le format horaire...
Merci de votre aide
Le mercredi 08 Décembre 2004 à 22:01 par DexterV :
Bonjour, Mon problème est le suivant. Après avoir copier/coller des données d'une requête Access vers une feuille Excel, j'ai modifié le format des cellules d'une des colonnes. Maintenant, pour voir afficher ces changements de format, je dois double cliquer sur chacune des cellules pour voir apparaître le nouveau format appliqué, car le changement n'apparaît pas automatiquement. Avec six feuilles de 2500 lignes chacune, ça devient plutôt long. Quelqu'un a une idée? Merci
Bonjour, J'ai le même problème mais mes cellule sont en format horaire. je suis obligé de double cliquer sur chaque cellule pour pouvoir les traiter mais si j'utilise la formule collage spécial "x1" ça m'enlève le format horaire... Merci de votre aide
