OVH Cloud OVH Cloud

Enregistrer feuille sous... valeurs only pas les macros...

4 réponses
Avatar
Ptit Con
J'ai jamais du faire un titre de message aussi incomprehensible moi...
Re bonjour tout le monde, vive le beau temps...


Dites moi.... j'ai un classeur avec une feuille1 et feuille2

Pour la suite je travaille slmt par macros....
feuille 2 a des cellules qui font reference a feuille1
Je fais un enregistrer-sous de ma feuille2 dans un nouveau classeur,
mais le probleme est que je ne sais pas comment ne garder QUE mes valeurs et
pas les formules..., en gros mon nouveau classeur excel, je ne veux plus de
liasons ni formules, juste des valeurs de ma feuille2 a l'instant t....
alors que la j'ai encore des cellule qui ont des liens vers feuille1 de mon
premier classeur...

Existe il une option lors de la copie pour cela ou dois je passer par une
operation intermediaire et manipuler toutes mes cellules pour recuperer les
valeurs... ?

Merci de vos lumieres... Ci suit ma procedure de copie de ma feuille... (pas
tres francais cette phrase.. decidement..)



'Enregistrer feuille bon sortie
Sheets("bonsortie").Select
nom = "BonSortie" & Format(Worksheets("explications").Cells(1,
10).Value, "00000") ' ca c juste un numero ki s'incremente...pour nommer
mon nouveau fichier...
Sheets("bonsortie").Copy
ChDrive "c"
ChDir "c:\magasin\bonssortie"
ActiveWorkbook.SaveAs Filename:=(nom), _
FileFormat:=xlNormal, Password:="toto", WriteResPassword:="toto", _
ReadOnlyRecommended:=True, CreateBackup:=False
ActiveWindow.Close
MsgBox "Fichier enregistré sous: " & nom & ".xls"
'Feuille enregistree....

4 réponses

Avatar
Christian.L
Bonjour

A remplacer :
Sheets("bonsortie").Copy

par :

Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks: _
False, Transpose:úlse

qui va remplacer toutes tes cellules par leur valeurs

Bon courage

C.L.


"Ptit Con" a écrit dans le message de
news:%
J'ai jamais du faire un titre de message aussi incomprehensible moi...
Re bonjour tout le monde, vive le beau temps...


Dites moi.... j'ai un classeur avec une feuille1 et feuille2

Pour la suite je travaille slmt par macros....
feuille 2 a des cellules qui font reference a feuille1
Je fais un enregistrer-sous de ma feuille2 dans un nouveau classeur,
mais le probleme est que je ne sais pas comment ne garder QUE mes valeurs
et

pas les formules..., en gros mon nouveau classeur excel, je ne veux plus
de

liasons ni formules, juste des valeurs de ma feuille2 a l'instant t....
alors que la j'ai encore des cellule qui ont des liens vers feuille1 de
mon

premier classeur...

Existe il une option lors de la copie pour cela ou dois je passer par une
operation intermediaire et manipuler toutes mes cellules pour recuperer
les

valeurs... ?

Merci de vos lumieres... Ci suit ma procedure de copie de ma feuille...
(pas

tres francais cette phrase.. decidement..)



'Enregistrer feuille bon sortie
Sheets("bonsortie").Select
nom = "BonSortie" & Format(Worksheets("explications").Cells(1,
10).Value, "00000") ' ca c juste un numero ki s'incremente...pour nommer
mon nouveau fichier...
Sheets("bonsortie").Copy
ChDrive "c"
ChDir "c:magasinbonssortie"
ActiveWorkbook.SaveAs Filename:=(nom), _
FileFormat:=xlNormal, Password:="toto", WriteResPassword:="toto",
_

ReadOnlyRecommended:=True, CreateBackup:úlse
ActiveWindow.Close
MsgBox "Fichier enregistré sous: " & nom & ".xls"
'Feuille enregistree....




Avatar
Ptit Con
Rien a dire... c'est nickel...
Je te remercie et bon apres midi... que le bonheure submerge ta demeure et
que la reussite innonde ton travail... :-))

A+





"Christian.L" a écrit dans le message de
news:%
Bonjour

A remplacer :
Sheets("bonsortie").Copy

par :

Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks: > _

False, Transpose:úlse

qui va remplacer toutes tes cellules par leur valeurs

Bon courage

C.L.


"Ptit Con" a écrit dans le message de
news:%
J'ai jamais du faire un titre de message aussi incomprehensible moi...
Re bonjour tout le monde, vive le beau temps...


Dites moi.... j'ai un classeur avec une feuille1 et feuille2

Pour la suite je travaille slmt par macros....
feuille 2 a des cellules qui font reference a feuille1
Je fais un enregistrer-sous de ma feuille2 dans un nouveau classeur,
mais le probleme est que je ne sais pas comment ne garder QUE mes
valeurs


et
pas les formules..., en gros mon nouveau classeur excel, je ne veux plus
de

liasons ni formules, juste des valeurs de ma feuille2 a l'instant t....
alors que la j'ai encore des cellule qui ont des liens vers feuille1 de
mon

premier classeur...

Existe il une option lors de la copie pour cela ou dois je passer par
une


operation intermediaire et manipuler toutes mes cellules pour recuperer
les

valeurs... ?

Merci de vos lumieres... Ci suit ma procedure de copie de ma feuille...
(pas

tres francais cette phrase.. decidement..)



'Enregistrer feuille bon sortie
Sheets("bonsortie").Select
nom = "BonSortie" & Format(Worksheets("explications").Cells(1,
10).Value, "00000") ' ca c juste un numero ki s'incremente...pour
nommer


mon nouveau fichier...
Sheets("bonsortie").Copy
ChDrive "c"
ChDir "c:magasinbonssortie"
ActiveWorkbook.SaveAs Filename:=(nom), _
FileFormat:=xlNormal, Password:="toto",
WriteResPassword:="toto",


_
ReadOnlyRecommended:=True, CreateBackup:úlse
ActiveWindow.Close
MsgBox "Fichier enregistré sous: " & nom & ".xls"
'Feuille enregistree....







Avatar
AV
Il n'est pas nécessaire de sélectionner et copier/coller pour ne garder que les
valeurs :

ActiveSheet.UsedRange = ActiveSheet.UsedRange.Value

AV
Avatar
Christian.L
Bonjour

Quel heureux monde, dans lequel un problème génère plusieurs solutions

C.L.

"AV" a écrit dans le message de
news:
Il n'est pas nécessaire de sélectionner et copier/coller pour ne garder
que les

valeurs :

ActiveSheet.UsedRange = ActiveSheet.UsedRange.Value

AV