Obliger une cellule à faire un espace dans le chiffre tapé

ROGER2327

XLDnaute Barbatruc

• 20 Avril 2010

• #16

Re : Obliger une cellule à faire un espace dans le chiffre tapé

Re...

sissimumu à dit:

ok bon j'ai capté, c'est le fait d'avoir des lettres qui fait que ca fonctionne pas..
j'espere que quelqu'un aura une petite idée pour m'aider
merci d'avance

Cliquez pour agrandir...

Avec une procédure évementielle.

Dans le module de la feuille où les valeurs doivent être saisie, placer le code suivant :

Code:

[COLOR="DarkSlateGray"][B]Private Sub Worksheet_Change(ByVal Target As Range)
Dim oCel As Range
   With Range("B2:B11") [COLOR="SeaGreen"]'plage de saisie[/COLOR]
      If Not Intersect(Target, .Cells) Is Nothing Then
         For Each oCel In Intersect(Target, .Cells).Cells
            If Len(oCel.Value) > 2 Then
               If Mid$(CStr(oCel.Value), Len(CStr(oCel.Value)) - 2, 1) <> " " Then
                  oCel.Value = Left$(CStr(oCel.Value), Len(CStr(oCel.Value)) - 2) & " " & Right$(CStr(oCel.Value), 2)
               End If
            End If
         Next oCel
      End If
   End With
End Sub[/B][/COLOR]

Les valeurs que vous saisirez dans la plage B2:B11 devraient prendre le format que vous souhaitez.

Vous pouvez adapter à la plage de saisie qui vous convient en modifiant :

Code:

[COLOR="DarkSlateGray"][B]   With Range("[COLOR="Red"]B2:B11[/COLOR]") [COLOR="SeaGreen"]'plage de saisie[/COLOR][/B][/COLOR]

ROGER2327
#3245

 

Vote positif 0 Vote négatif

R

romubzh35

XLDnaute Occasionnel

• 21 Avril 2010

• #17

Re : Obliger une cellule à faire un espace dans le chiffre tapé

Bonjour
je ne sais pas faire cela lol..
j'ai tout supprimé les infos confidentielles sur mon pc et je vous envoi ce qu'il en reste
les cellules en jaunes doivent etre celles qui s'affichent de la facon demandée
4 caracteres + 2 caracteres aores un espace
Cijoint.fr - Service gratuit de dépôt de fichiers
merci d'avance

 

Vote positif 0 Vote négatif

Tibo

XLDnaute Barbatruc

• 21 Avril 2010

• #18

Re : Obliger une cellule à faire un espace dans le chiffre tapé

Bonjour,

Un essai sur la base d'un contrôle par Validation (menu Données) + une Mise en Forme Conditionnelle pour signaler les erreurs de saisie.

Nécessite de saisir avec un espace.

Voir le fichier joint

(J'ai allégé ton fichier : sans doute des images ou formes cachées dans un coin qui l'alourdissait)

@+

 

Pièces jointes

• Mumu.zip

  12.8 KB · Affichages: 25
• Mumu.zip

  12.8 KB · Affichages: 23
• Mumu.zip

  12.8 KB · Affichages: 20

Vote positif 0 Vote négatif

R

romubzh35

XLDnaute Occasionnel

• 21 Avril 2010

• #19

Re : Obliger une cellule à faire un espace dans le chiffre tapé

Ok je vais faire comme tu me proposes.
Comment as tu fais pour alleger ?
En fait à la base, j'ai un classeur excel avec 2 onglets, environ 3 photos en tout, et ca monte direct à plusieurs mégas meme en compressant les photos.
merci pour votre aide .

 

Vote positif 0 Vote négatif

Tibo

XLDnaute Barbatruc

• 21 Avril 2010

• #20

Re : Obliger une cellule à faire un espace dans le chiffre tapé

re,

sissimumu à dit:

Comment as tu fais pour alleger ?

Cliquez pour agrandir...

Ben, j'ai supprimé les photos ...😛

En fait, j'ai appuyé sur F5 - Cellules - Objets - OK

Puis Suppr

Ca a pour effet de supprimer tous les objets, images, photos, ...

Et ainsi pouvoir joindre le fichier sur le Forum.

Je te laisse remettre les photos si besoin.

@+

 

Vote positif 0 Vote négatif

R

romubzh35

XLDnaute Occasionnel

• 21 Avril 2010

• #21

Re : Obliger une cellule à faire un espace dans le chiffre tapé

merci bcp
et bonne journée à tous

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 21 Avril 2010

• #22

Re : Obliger une cellule à faire un espace dans le chiffre tapé

Re...

sissimumu à dit:

(...)
je ne sais pas faire cela lol..
(...)

Cliquez pour agrandir...

Alors, je le fais...

(Copier le code - Ouvrir le classeur - Alt + F11 - Sélectionner Feuil1 (Gamme de conditionnement) - Coller le code - Fermer la fenêtre)
​

ROGER2327
#3250

 

Pièces jointes

• cijxIhYycI_2.xls

  31 KB · Affichages: 41

Vote positif 0 Vote négatif

R

romubzh35

XLDnaute Occasionnel

• 21 Avril 2010

• #23

Re : Obliger une cellule à faire un espace dans le chiffre tapé

nickel

merci bcp !!!

 

Vote positif 0 Vote négatif