Résultats de la recherche

Re : Selectionner plusieur check box sur feuil1 fonctionne pas Re bonsoir, Vous avez omis le mot checkbox dans votre code.:p A+ Stéfan :)

Re : Selectionner plusieur check box sur feuil1 fonctionne pas Bonsoir creolia et le forum, Voici le code adapté. :) Private Sub CommandButton1_Click() Dim obj As OLEObject For Each obj In ActiveSheet.OLEObjects If TypeOf obj.Object Is msforms.CheckBox Then...

Re : Photo sur formulaire Bonjour Maval et le forum, Si j'ai bien compris votre demande, avec le code de Boisgontier Jacques. :) A+ Stefan

Re : ouvrir en vba une fichier d'un même dossier Bonsoir wrap food et le forum, Voilà une partie de votre demande, ouvrir fichier Y et le fermer. :) Pour ce qui est de l'impression, je pense qu'il faudra placer le code dans thisworkbook\workbook_open. :) A+ Stéfan

Re : Userform et listbox je n'arrive pas a valider ! Bonjour Bosco et le forum, Pour ce qui est de colorer la ligne si date entrée, le plus simple je pense est une mise en forme conditionnelle. :) Sélectionner toute la zone en question, ici à partir de H12, ensuite cliquez sur mise en forme...

Re : Userform et listbox je n'arrive pas a valider ! Bonjour titiborregan, Bosco et le forum, Je me suis permis de simplifier un peu le code dans l'userform client, voyez si cela vous convient et si cela répond à votre demande. :) A vous d'adapter pour le reste, mais suis toujours disponible...

Re : Problème d'association de données avec un UserForm Bonjour, Effectivement Paf j'ai pris le code sur un fichier ou j'efface le nom après chaque utilisation car je travail avec un deuxième classeur et j'avais toujours des pertes de mes cellules de références, :cool: donc ici inutile de...

Re : Problème d'association de données avec un UserForm Bonjour benadry et le forum, Il suffit de modifier le nom de la feuille (sheets) dans le code. :) Mais avancez au fur et à mesure pas tout en même temps, une chose à la fois. Utilisez un fichier exemple que l'on modifiera au fur et à...

Re : Placer des userform dans une feuille Re bonsoir, Pourquoi ne pas alimenter la feuille au lieu de l'userform. Beaucoup plus facile que de ranger les userforms dans la feuille avec les propriétés Left et Top, et en plus ils ne bougerons pas lorsque vous vous déplacerez dans la feuille...

Re : Placer des userform dans une feuille Bonsoir Gysmo et le forum, Personnellement je ne vois pas l'intérêt si cela est possible ? :confused: En général, on fait le contraire, on l'alimente avec les données de la feuille. On lance l'userform soit au démarrage ou après le clic sur un...

Re : Problème d'association de données avec un UserForm Bonsoir benadry, Paf et le forum, Mêmes remarques que Paf avec une de plus, lorsque vous déclarez des variables faites attention à ne pas utiliser des noms réservé à Excel car il n'aime pas cela. :mad: bug possible, ici je parle de...

Re : MACRO pour creation de pdf qui ne fonctionne pas sur pc portable Bonjour pascal21 et le forum, Bête question, mais avez vous créé le répertoire "année 2014" sur votre portable. :p Autre chose, le programme PDF créator n'est plus nécessaire avec excel 2007, cela fonctionne sans. :)...

Re : Attendre qu'une sub soit fini pour en executer une autre. Bonjour lemarcheurfou et le forum, Peut-être en utilisant la commande DoEvents entre les différentes macro. :) A+ Stéfan

Re : Macro spécifique à un fichier Bonjour webperegrino et le forum, Essayez ceci, si j'ai bien compris votre demande. :) ActiveDocument.Range.GoTo(What:=wdGoToPage, Name:="2").Select A+ Stéfan

Re : Liste deroulante Bonjour le forum, Si bien compris votre demande, =NB.SI(A2:A20;1) Cette formule compte le nombre de 1 dans la zonne A2:A20. A vous d'adapter. :) A+ Stéfan

Re : Bonne Année 2014 Je me joint à tous pour souhaiter une bonne année 2014 pour ce site extraordinaire. :) Merci aux membres actifs. A+ Stéfan

Re : Liste deroulante Bonjour abeyante, Hasco et le forum, Si je puis me permettre, la formule de Hasco avec un test si colonne A vide, cela évite un message d'erreur. :) =SI($A2="";"";RECHERCHEV($A2;Feuil2!$A$2:$D$5;COLONNE();FAUX)) A+ Stéfan :)

Re : Tout en majuscule Bonsoir M.D et le forum, Private Sub TextBox_prenom_Afterupdate() TextBox_prenom.Value = UCase(TextBox_prenom) End Sub Voilà qui devrait faire l'affaire.:) A+ Stéfan Edit: Bonsoir JBARBE et gosselien.

Re : Enregistrer sous sans écraser le fichier Bonjour bonoboas et le forum, Voici un bout de code qui j'espère vous aidera. :) Sub test() Dim chemin As String, fichier As String chemin = ThisWorkbook.Path 'Définit un nom par défaut "fichier travaux" fichier = chemin & "\" & "fichier...

Re : Imbriquer SI ET OU dans ma fonction Bonjour chris6999 et le forum, Je pense qu'il y a une petite erreur dans la fonction Decaler, car il me semble qu'il faut faire référence à une cellule ou une plage de cellule et $1 n'est pas une cellule. :confused: Donc il serait utile de déposer un...