Rapport de message :*
 

Re: Félicitation

Titre du sujet : Re: Félicitation
par Veriland le 22/05/2007 23:36:19

Bonsoir myDearFriend!, JeanMarie, Salim et toi le nouveau Forum,

Voilà qui est fait, je suis inscrit ... yahooo !

Didier, voilà une bien bonne idée, rien de mieux qu'un forum pour enrichir ton portail, je n'ai pas de question sur Excel tu t'en doutes bien (mouarf!) mais voilà qu'un nouvel univers s'ouvre au monde des Excélien(e)s et c'est ça qui compte ... va falloir que VériTi assure y'a de la concurrence ... lol

Bon ben tu me connais faut que j'essaye toutes les options pour me faire une idée de la bête ... niark!

code :

Option Explicit

' Vériland - http://www.veriti.net
' faire parler son compagnon Office
Sub AnimMessage()
  Assistant.Visible = True

  With Assistant.NewBalloon
  
  .BalloonType = msoBalloonTypeBullets
    .Animation = msoAnimationEmptyTrash
    .Heading = " Bonjour "
    ' chr (10) pour passer à la ligne
    .Text = "Je suis votre compagnon le ballon," _
     & Chr(10) _
     & "et j'aime bien vous voir travailler " _
     & Chr(10) _
     & Chr(10) _
     & "                             lol ;-)" _
     & Chr(10) _
     & Chr(10) _
     & "Date:   Mai 2007" _
     & Chr(10)
    .Show
  End With
  
  Assistant.Visible = False

End Sub


formule :
=SI($F$5<>1;SOMME.SI($J$4:$IV$4;1;I8:IV8)+SOMME.SI($J$4: $IV$4;$F$5;I8:IV8);SOMME.SI($J$4:$IV$4;$F$5;I8:IV8))


image ?

Image redimensionnée

je verrais le résultat après avoir posté car la prévisualation ne semble pas prendre en compte le format "code" et "formule" mais l'image je la vois. En tous cas pour le reste je ne suis pas perdu la prise en main est simple c'est parfait on se sent un peu comme chez soi il ne manque rien !

Allez à bientôt et bonne programmation, Bravo Didier!

A+ Vériland

PS : Je ne viens pas les mains vides, je ramène ce smiley Image redimensionnée et je trinque à ta santé