Recherche:

Bonjour,

Je ne suis pas sur d'avoir la meilleur réponse.

Au lieu d'utiliser les outils formulaire, essayes avec:
Affichage/barre d'outils/boites à outils contrôle /Combobox

Dans les...

Bonjour à tous ,

Je cherche depuis un moment, à séparer les feuilles d'un pdf et à les renommer.

Exemple: J'ai une colonne dans une feuille Excel qui a 40 N° de commande.
Aujourd'hui, je...

Bonsoir Runsh, casefayere,

Ci-dessous un petit code que j'ai bidouillé
Colonne B: compte
Colonne C: Solde
Colonne G: Somme des soldes par compte sur la ligne insérée

A toi d'adapter:

Bonsoir BOU,

Ci-dessous un code qui va mettre la couleur de ta cellule dans ta combobox(suivant sélection):

J'ai fais l'essai et ca marche impeccable !

Code pour un userform avec une combo:

Bonsoir cris,

Tu veux absolument des combobox?

Autrement il y a les listes déroulantes. J'utilise souvent les listes pour faire appel aux données d'une autre feuille.

Tu nommes tes deux...

Bonjour,
avec l'enregistreur de macro:




Range("A1").Select
ActiveCell.FormulaR1C1 = _
"=IF('LISTE COMPLETE'!R[1]C[38]="""",""0"",IF('LISTE COMPLETE'!R[1]C[38]<>"""",'LISTE...

Bonjour,

As tu essayé sans:

Unload UF_Saisie
A la place, tu initialises les saisies:


Textbox1.value =""
Combobox1.value=""

Entre temps, j'ai fais un code avec mes connaissances.
Certainement qu'il y a plus simple mais ça marche



Sub color()

Dim R As Integer
Dim B As Integer
Dim C As Byte

Si il n'y a pas de lien, il a ce genre de code:



Sub color()
For i = 1 To 15
Rows(i).Interior.color = RGB(Int(Rnd * 256), Int(Rnd * 256), Int(Rnd * 256))
Next
End Sub

Bonjour,

Y a t il un lien logique entre le contenu et la couleur?

Effectivement, je suis sur Excel 2003.
Je me suis fait un tableau de plusieurs colonnes avec differentes dates de B2 en F15.(format date)
J'ai selectionné cette zone et j'ai tapé:

Condition 1:...

Mon tableau commence en A1.
Si il commence en B2 il faut mettre B2

Je sélectionne les cellules concernées(ton tableau) et j'applique la mise en forme conditionnelle.

Je viens d'essayer et ça marche

En sélectionnant la colonne puis:

Condition 1:

"La formule est" "=A1=AUJOURDHUI()"

Condition 2:

Bonsoir,

Ça ne répond peut -être pas à ton besoin, mais as-tu essayé Format / Mise en forme conditionnelle.

Bonsoir PGZ,

Quand je fais l'envoi du raccourci directement dans lotus notes, il n'y a pas de problème. J'arrive à pointer le raccourci dans la fenêtre de recherche du dossier à mettre en PJ et...

Bonsoir,

Eh non!

J'ai essayé d'envoyer le ".Lnk " en pièce jointe et ça ne marche pas.:cry:

ATTACHMENT = "P:\Donnée\essai.Lnk"


Si quelqu'un a une idée...

Je n'avais pas vu pour le mois en lettres !



Private Sub UserForm_Initialize()

TextBox1.Value = Format(Now, "dd/mmmm/yy") 'mmmm pour le mois en lettre

End Sub

Bonjour,

Ça doit suffire :



Private Sub UserForm_Initialize()
TextBox1.Value = Date
End Sub

Bonjour à tous,
J'avance:ccool:
Ce code me permet de créer un raccourci:

Option Explicit

Sub Tst()
Dim oShell As WshShell
Dim oShortCut As WshShortcut
Dim sChemin As String

bonjour à tous,

Je crois comprendre ce que tu cherche !
J'ai galéré un moment pour confronter deux combobox:
Ci-dessous un petit bout de code qui confronte deux combobox1 et 2 dans un userform:...

Merci PGZ.:ccool:

Je ne pourrai pas fouiner avant lundi, je n'ai pas lotus notes chez moi.
C'est bien la première que ca m'embête d'être en Week End.
:calim2::cry::roll::mrgreen::P
A lundi

Bonjour et encore merci à toi PGZ

J'ai trouvé une partie de mon bonheur avec ce code:

Sub SendNotesMail()

On Error Resume Next


Dim Maildb As Object 'The mail database

Bonjour,
J'ai fais ça et je trouve 40549


Sub Macro1()
Dim date1 As Date
Dim date2 As Date
Dim dif

date1 = "08-01-2011"

Merci PGZ,

J'ai essayé de m'inspirer de ton code mais sans succès(pour l'instant).
J'ai un défaut Objet.
Y a t'il une référence particulière à cocher.