valeur d'une cellule

S

selecteur

Guest

• 26 Avril 2005

• #2

Bonjour,

A mon avis si tu veux taper 2 ET obtenir 38 dans la même cellule ce n'est pas possible...mais bon avec excel je me méfie !

Je ne demande qu'à voir.


Selecteur.

 

Vote positif 0 Vote négatif

dg62

XLDnaute Barbatruc

• 26 Avril 2005

• #3

Bonjour Selecteur, Kromi



une petite macro à lancer sur une sélection

Code:

Sub multiplie()

Dim cel As Range
For Each cel In Selection

cel.Value = cel * 19
Next cel
End Sub

 

Vote positif 0 Vote négatif

M

Minick

XLDnaute Impliqué

• 26 Avril 2005

• #4

Salut,

Tu peux egalement essayer avec les evenementielles sur la feuille.
Dans le petit exemple joint il faut que tu nommes la plage de cellule
qui doit etre multipliée par 19 comme ceci: 'Multiplier'
et des que tu entreras un nombre dans la plage 'Multiplier' il sera multiplié par 19

Code:

Dim DisableChange As Boolean

Private Sub Worksheet_Change(ByVal Target As Range)
    If DisableChange = False Then
        If IsNumeric(Target) And Not Intersect(Target, Range('Multiplier'Â'Â')) Is Nothing Then
            DisableChange = True
            Target = Target * 19
        End If
    Else
        DisableChange = False
    End If
End Sub

@+ Minick

Message édité par: Minick, à: 26/04/2005 17:52

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 26 Avril 2005

• #5

bonjour kromi,

Essaie l'exemple ci-joint et dis nous si cela te convient.
Le code est sûrement optimisable.

En espérant que cela te dépanne.

Abel

[file name=Exemple_kromi.zip size=8613]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Exemple_kromi.zip[/file]

 

Pièces jointes

• Exemple_kromi.zip

  8.4 KB · Affichages: 6

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 26 Avril 2005

• #6

Re,

Oups !

Pardon dg62 et Minick. Pas rafraichi.

Abel.

 

Vote positif 0 Vote négatif

Luki

XLDnaute Accro

• 26 Avril 2005

• #7

Bonsoir le fil, Kromi,

Il y a eu un sujet dans le même genre, il y a peu:

Lien supprimé

A +

 

Vote positif 0 Vote négatif