Communauté Fb
Follow us on twitter
Les vidéos du site
Le site complément

Programmer en vb

Bonjour et bienvenue,

Programmer en VB est le site qui vous fera prendre conscience que vous pouvez concevoir votre programme informatique vous-même, que vous soyez artisan, employé ou étudiant.

Le Visual Basic est un langage informatique très puissant, très flexible et très abordable.
Une version en application se trouve sous Office
Excel pour exemple :
Tapez Alt + F11 à l’aide de votre clavier puis vous voilà dans l’éditeur de code VBA.

Notre forum d’entraide vous offre des tutoriels ainsi que divers exemples tout prêt à adapter à votre projet personnel.
Nous vous demandons uniquement de la bonne humeur et de la bonne volonté pour toutes questions ou toutes aides quelle qu’elle soit.
Sachez que pour progresser rapidement il est conseillé d’aider au mieux les autres membres.
Nous ne sommes pas là pour juger les qualités ou défauts de codes proposés, mais pour trouver ensemble la solution à votre demande.

A vos claviers :

Afin de remplir le forum, nous vous demandons de partager sur les réseaux sociaux et autres.
https://www.facebook.com/AdminPVB/


Merci de nous rejoindre sur http://programmer-en-vb.forumactif.org/
Merci d'avoir pris le temps de lire.
Merci pour votre inscription.

L'équipe de Programmer-en-VB

Forum de programmation VBA et VB.NET

Welcome if you do not speak french,you are able to translate the whole topics with the flags just below this message. Click to English

Visual Basic Application et VB.net de puissants langages à la portée de tous.

Participez et soyez acteurs des divers forums ci-dessous.

Bienvenue à chaque nouveaux membres et merci à tous ceux qui font vivre ce forum.


Qui est en ligne ?

Il y a en tout 6 utilisateurs en ligne :: 1 Enregistré, 0 Invisible et 5 Invités

AdminPVB


Le record du nombre d'utilisateurs en ligne est de 65 le Mar 8 Juil - 23:40

Statistiques

Nos membres ont posté un total de 6060 messages dans 678 sujets

Nous avons 551 membres enregistrés

L'utilisateur enregistré le plus récent est Pralin

Recherche dans les forums

Utiliser cette méthode afin de trouver rapidement les discussions disponible sur notre forum.


Derniers sujets

» Bienvenue à Pralin
par Berly Ven 25 Mai - 21:27

» Instants musique
par Berly Ven 25 Mai - 21:24

» HUMOUR ET DERISION PAR IMAGES
par AdminPVB Lun 21 Mai - 8:37

» Incompatibilité avec Windows 10 64Bits
par TitiPointCom Jeu 17 Mai - 21:52

» Mind Mapping // * cartographie de l'esprit *
par AdminPVB Dim 13 Mai - 20:43

» Problème d'affichage nb heures >24
par TitiPointCom Dim 13 Mai - 15:42

» Débuter en vba
par IFFIC Ven 11 Mai - 15:31

» Problème d'enregistrement en pdf
par Berly Jeu 10 Mai - 22:32

» Nom d'un USF en variable?
par AdminPVB Mar 8 Mai - 19:01

» ASTUCES UTILES
par IFFIC Dim 6 Mai - 18:25

» Enregistrer sous
par danpom302 Jeu 3 Mai - 22:39

» Activer un classeur déjà ouvert
par danpom302 Jeu 3 Mai - 22:38

» Enregistrer sous un autre nom.
par IFFIC Dim 29 Avr - 18:43

» Affichage erroné de la date
par danpom302 Jeu 26 Avr - 16:19

» ESPRIT FORUM
par IFFIC Lun 23 Avr - 19:11

Utiliser le bouton résolu

Dans votre message d'origine
cliquer sur le bouton



Ensuite tout en bas sur
Modifier le titre du sujet
cliquer sur le bouton

Résolu !!!

Ensuite changer l’icône du sujet par le bouton

Voilà pas plus compliqué que cela.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Partenaires


créer un forum



Annuaire referencement


Flux RSS


MSN 

Mai 2018

LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   

Calendrier Calendrier

Petit souci d'affichage de valeurs(Tableau) valeurs saisies au clavier

Sam 14 Avr - 21:19 par Berly

Bonsoir a tous  Very Happy.

Voila j'ai un petit souci de méthode .

Je poste le code ,Ne vous souciez pas des zones de commentaire.

A la fin le nombre d éléments du tableau correspond bien au nombres de valeurs saisies par l'utilisateur .

Je ne trouve pas la méthode pour afficher les valeurs .....bon c'est vrai que en ce moment je bricole  Rolling Eyes.

Merci pour vos réponses  Wink.

Code:
[Imports …


[ Lecture complète ]
Traduction D'algorithmes

Mer 7 Mar - 22:28 par Berly

Bonsoir A toutes et Tous .

J'ouvre ce Post en vue d'une éventuelle collaboration de membres désireux de collaborer a l'évolution de tous.

Le but de ce forum ,consisterai a rechercher des Algorithmes en "Pseudo-code", sans restriction de ressources en appliquant le principe du copié collé .(Sans omettre de citer les sources de provenance  Very Happy,Livres ,exercices scolaires Very Happy ,etc.....)

La …

[ Lecture complète ]
SOS traduction

Dim 4 Mar - 9:11 par e.sainturlo

Bonjour à tous,

Je souhaite comprendre ce qui se cache derrière cette longue suite d'instructions imbriquées les unes dans les autres:

numero2 = Conversions.ToInteger(Operators.AddObject(numero2,Operators.ModObject(Operators.MultiplyObject(NewLateBinding.LateIndexGet(MPMP, new object[] {numero1,numero3}, null), Strings.Asc(MCMC.Substring(numero3, 1)) - 65), 26)));

Quelqu'un saurait-il …

[ Lecture complète ]
Et si on parlait des fichiers.txt et fichiers.csv

Ven 2 Fév - 20:51 par Berly

Bonsoir le forum  Very Happy

Je viens vers vous pour étudier en vbnet les fichiers.

Actuellement j'étudie dans une autre langage ces fichiers.



https://fr.wikipedia.org/wiki/Comma-separated_values.


Ces bases de données sont intéressantes a exploiter ,pour diverses applications dans la vie de tous les jours.


1° Création de fichiers avec extension ou pas.Y a t'il une bibliothèque native en …

[ Lecture complète ]
VB 2005 express

Mar 6 Fév - 17:02 par christian80.1951

Bonjours a tous,
J'utilise vb 2005 express.
dans la form1.vb[design] je créer une listebox .
Lorsque je veux la positionner dans cette form , lors de son déplacement avec la souris ma listbox devient invisible,
ce qui rend son positionnement mal-aisé.
Ce phénomène se produit aléatoirement ! ( certainement une mauvaise manip ) et cet état persiste dans le projet.
J'espère être compréhensible.


[ Lecture complète ]
Création d'un raccourci sur le Bureau pour son Application

Mar 10 Oct - 18:49 par IFFIC

Bonsoir à tous, ou Bonjour s'il est plus tôt qu'à cette heure,
Je ne suis pas passé bien souvent par ici, car j'étais pris sur un gros projet depuis voici un peu plus d'un an.

Au bénéfice de bidouilles trouvées dans mes travaux, je vous livre celle-ci:
Car il est bien confortable de n'avoir pas à fouiller dans l'arborescence d'un disque externe ou une clé USB, voire en ayant changé de …

[ Lecture complète ]
Petits bidouillages pour ce faciliter La vie ,Astuces et codes pratique

Dim 11 Juin - 12:20 par Berly

Bonjour le Forum  Very Happy.

Lorsque j'écrivais dans mon code Console.Writeline ("Patati,Patata,......) ,j'ai d'abord utilisé le copié collé en changeant la valeur du texte .

Bon d'accord ,c'est bien mais ,ça me saoul un peu ,au fur et a mesure de mes apprentissages ,j'ai découvert les fonctions  Very Happy.

Maintenant je partage celle ci avec vous .

On est la sur un exemple de code en "Mode …

[ Lecture complète ]
Menustrip Vbnet Visual Studio

Sam 16 Sep - 21:05 par Berly

Bonsoir le Forum  Very Happy

Je suis actuellement en construction  d'un logiciel pour les enfants en scolarité primaire.(Visual Studio Community 2017)

Je l'ai commencé et il fonctionne parfaitement a ce stade.

J'utilise Le contrôle MenuSrip.

Au commencement il est question d'afficher par catégorie tables de 1 a 10 .
Un Premier Bouton "Tables de Multiplications" Aucun événement 
Puis Ajouts …

[ Lecture complète ]
suppression d'un fichier txt en cours d'utilisation

Mar 5 Sep - 9:51 par La boc

Bonjour,

dans mon application j'ai un fichier txt qui est chargé dans un DataGridView en fonction du n° ID.

Quand je supprime un ID, je dois aussi supprimer ce fichier, quand je fait un delete ça marche bien, le fichier est bien supprimé du dossier mais quand je ferme l'application j'ai un message box:

"Violation de l’accès concurrentiel:
Delete command a effectué 0 des enregistrements …

[ Lecture complète ]

Masquer des colonnes automatiquement

Partagez
avatar
danpom302
Step_Three_VBA
Step_Three_VBA

Localisation : Québec
Messages : 426
Date d'inscription : 23/09/2013
Age : 67

Résolu Masquer des colonnes automatiquement

Message par danpom302 le Ven 13 Déc - 0:56

Bonjour à tous,

Je sollicite à nouveau votre aide pour corriger mon code ci-après.

Ce que je recherche :
Lorsqu'une colonne de mon tableau (Colonne I à NO seulement) n'a aucune cellule de couleur bleu d'affichée, j'aimerais que cette colonne se masque en appuyant sur certaines touches comme ctrl+m, afin de toujours voir les cellules restantes de couleur bleu. Dans toutes ces cellules, j'ai des formules conditionnelles.

Dans mon tableau ci-joint, les colonnes I à MN devrait se masquer automatiquement à chaque fois qu'une de ces colonnes n'affiche plus de cellules de couleur bleu.

Code:
Sub Masquer_Colonnes()
'
' Masquer_Colonnes Macro
'

'
    Columns("MP:MP").Select
    Selection.EntireColumn.Hidden = True
End Sub

Dans mon code, je masque seulement la colonne MP.

Merci à l'avance pour votre aide,

Dan

Mon fichier :
http://pvb.comeze.com/Fichier_upload/danpom302/Essai2.xlsm
avatar
phoenixordi
Modérateur
Modérateur

Localisation : sarthe
Messages : 319
Date d'inscription : 24/05/2013
Age : 51

Résolu Re: Masquer des colonnes automatiquement

Message par phoenixordi le Sam 14 Déc - 18:02

bonsoir,

voici un début de code (à coller dans un module simple et appeler via un bouton ou une procédure événementielle)
attention , ne pas coller les sub dans les modules de feuille mais dans un module simple, la lecture en est que plus facile et le projet est plus simple à travailler Wink

cependant , du fait que utilise des mfc risque de poser problème dans la rédaction du code dont tu as besoins :(passer par des macros pour cette mise en forme simplifierait le travail, éviterait les accidents et allègerait grandement ton classeur.



Comme tu es débutant, je t’explique le principe de ce code (qui ne fait pas réellement ce que tu demandes)
Ne pas hésiter à consulter : http://programmer-en-vb.forumactif.org/f23-les-didactiques
Déclaration des variables
On boucle sur les colonnes voulues de la ligne 6 à 52pour compter le nombre de cellules bleu
Si pas de cellule bleue alors (action)
Si au moins une cellule bleue alors  (autre action et remise à zéro du compteur)
Et ainsi de suite sur chaque colonne  

Code:
Sub CACHE()
    Dim Nb As Byte
    Dim colonne As Integer
    Dim ligne As Byte
    
    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual

    For colonne = 9 To 379
        For ligne = 6 To 52
            Nb = 0
            If Cells(ligne, colonne).Interior.ColorIndex = 6299648 Then Nb = Nb + 1
        Next ligne
        If Nb = 0 Then Cells(ligne, colonne).EntireColumn.Hidden = False
        If Nb > 0 Then Cells(ligne, colonne).EntireColumn.Hidden = True
        Nb = 0
    Next colonne
    
    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic

End Sub


_________________
Cordialement
phoenixordi


avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Sam 14 Déc - 21:30

Bonjour Phoenixordi,danpom302.
@ phoenix heureux pour le coup de main ça fait plaisir.
@ danpom302
voici de mon coté un autre code que celui de Phoenixordi.
cependant même réflexion la mise en forme conditionnelle pose problème pour la vérification de la couleur intérieure de la cellule.
Code:
  Sub Masquer_Colonnes()
    '
    ' Masquer_Colonnes Macro
    '

    '
     
     
        Const la_couleur = 49 'à adapter
        Dim c As Range
        Dim derligne As Long
        derligne = Sheets("PlaniTâches (2)").Range("a6").End(xlDown).Row
        Application.ScreenUpdating = False
        Application.Calculation = xlCalculationManual
        For Each c In Sheets("PlaniTâches (2)").Range("I6:NO" & derligne)
                If c.Interior.ColorIndex = la_couleur Then c.EntireColumn.Hidden = True
        Next
        Application.ScreenUpdating = True
        Application.Calculation = xlCalculationAutomatic
    End Sub
pour ce qui est du crtl+m enregistre une macro renomme la puis colle l'intérieure de ce code ou celui de Phoenixordi dedans.

A bientôt.


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
phoenixordi
Modérateur
Modérateur

Localisation : sarthe
Messages : 319
Date d'inscription : 24/05/2013
Age : 51

Résolu Re: Masquer des colonnes automatiquement

Message par phoenixordi le Sam 14 Déc - 21:36

bonsoir,


grand chef Wink a écrit:@ phoenix heureux pour le coup de main ça fait plaisir.

pas de quoi (un peu rouillé mon vba) mais pas grand chose à faire sur mon site en ce moment plus occupé dans mon atelier à réparer les consoles de jeu qui ressortent du grenier (moins chères que les nouvelles générations)


_________________
Cordialement
phoenixordi


avatar
danpom302
Step_Three_VBA
Step_Three_VBA

Localisation : Québec
Messages : 426
Date d'inscription : 23/09/2013
Age : 67

Résolu Re: Masquer des colonnes automatiquement

Message par danpom302 le Sam 14 Déc - 22:59

Bonjour Phoenixordi,Fhoest,

J'ai essayé les deux codes séparément mais aucune colonne est masquée après avoir lancé la macro. Je vois qu'il se passe quelque chose mais aucune colonne masquée.

Est-ce à cause du numéro de la couleur que le tout ne fonctionne pas? Dans le code de Phoenixordi, le numéro est 6299648 alors que celui de Fhoest est 49 avec la mention à adapter?? Je ne suis pas sur de bien saisir mais j'ai remplacé le code 49 par 6299648 sans succès.

Dans mon document, les colonnes I à NO seront verrouillées afin que l'utilisateur de ce tableau ne puisse effacer des lignes ou des colonnes. Lorsque j'ai essayé vos codes, les cellules n'étaient pas verrouillées. Je prévoies rajouter le code pour verrouiller et déverrouiller lorsque le tout fonctionnera.

Plutôt que d'utiliser des formules dans les cellules I à NO, pouvons-nous faire changer a couleur des cellules avec un code VBA soit lorsqu'une date de début et une date de fin sont entrées, les cellules respectives des dates du calendrier, colonnes I à NO, se colorent automatiquement, semblable à MS Project. Pourquoi ne pas utiliser MS Project? Pour certaines personne, l'apprentissage de ce logiciel est quelque peu difficile.

En espérant que ces dernières informations pourront vous guider dans la correction de vos codes respectifs.

Merci pour votre aide,

Dan
avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Dim 15 Déc - 0:45

Bonjour,
les codes sont bon tout les deux,le seul problème vient de la mise en forme conditionnelle car lorsque l'on vérifie la couleur de la cellule malgré qu'elle soit colorisé par la MFC elle reste de couleur neutre par référence c'est à dire xlnone pour le code interior color et -4142 pour le code colorindex.
du coup aucune colonne ne se masque exemple avec ce code:
Code:
      Sub Masquer_Colonnes()
        '
        ' Masquer_Colonnes Macro
        '

        '
         
         
            Const la_couleur = 49 'à adapter
            Dim c As Range
            Dim derligne As Long
            derligne = Sheets("PlaniTâches (2)").Range("a6").End(xlDown).Row
            Sheets("PlaniTâches (2)").Range("MR6").interior.colorindex = 49 'ligne exemple pour colorisé la cellule avant de masqué la colonne
Application.ScreenUpdating = False
            Application.Calculation = xlCalculationManual
            For Each c In Sheets("PlaniTâches (2)").Range("I6:NO" & derligne)
                    If c.Interior.ColorIndex = la_couleur Then c.EntireColumn.Hidden = True
            Next
            Application.ScreenUpdating = True
            Application.Calculation = xlCalculationAutomatic
        End Sub
Avant de lancer le code regarde la couleur de la cellule MR6 elle est bleu mais grace à la MFC
le code ci dessus va la mettre bleu également mais en couleur origine derrière la MFC (ou sans la condition de la MFC) de ce fait la colonne sera masquée.

Test et fait un retour pour voir si tu as compris ce que je veux dire
A+


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
danpom302
Step_Three_VBA
Step_Three_VBA

Localisation : Québec
Messages : 426
Date d'inscription : 23/09/2013
Age : 67

Résolu Re: Masquer des colonnes automatiquement

Message par danpom302 le Dim 15 Déc - 17:59

Bonjour Fhoest,

J'ai testé ton code et effectivement, la colonne MR se masque. Mais ce sont plutôt toutes les colonnes à gauche de la colonne MR qui doivent se masquer car il n'y a plus de tâches à accomplir. J'ai donc modifié

ton code :

Code:
If c.Interior.ColorIndex = la_couleur Then c.EntireColumn.Hidden = True

pour ceci :

Code:
If c.Interior.ColorIndex <> la_couleur Then c.EntireColumn.Hidden = True

mais ici, toutes les colonnes I à NO se masquent.

Il faudrait que lorsqu'il n'y a plus de couleur bleu dans une ou des colonnes précédent la prochaine colonne avec une ou plusieurs cellules de couleur bleu, la ou les colonnes sans couleur se masque. Par contre, les colonnes qui sont sans couleur et qui sont situées après la dernière colonne avec une ou plusieurs cellules de couleur bleu doivent demeurer visibles.

Tu as sûrement observé que les cases qui sont de couleur bleu le sont parce que la condition pour que les cases deviennent bleu est le chiffre 1.

Comme tu peux voir, j'ai commencé à modifier ton code pour tester d'autres possibilité mais j'en ai encore beaucoup à apprendre.

Dan
avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Dim 15 Déc - 22:58

Bonsoir,
juste pour essai est ce que ceci convient mieux:
Code:
    Sub Masquer_Colonnes()
            '
            ' Masquer_Colonnes Macro
            '

            '
             
             
                'Const la_couleur = 49 'à adapter
                Dim c As Range
                Dim derligne As Long
                Dim dercolonne As Long
                derligne = Sheets("PlaniTâches (2)").Range("a6").End(xlDown).Row
                Sheets("PlaniTâches (2)").Range("MR6").Interior.ColorIndex = 49 'ligne exemple pour colorisé la cellule avant de masqué la colonne
                Application.ScreenUpdating = False
                Application.Calculation = xlCalculationManual
                For Each c In Sheets("PlaniTâches (2)").Range("I6:NO" & derligne)
                        If c.Text = 1 Then
                        If dercolonne < c.Column Then dercolonne = c.Column
                        End If
                        'If c.Interior.ColorIndex = la_couleur Then c.EntireColumn.Hidden = True
                Next
               
                For i = 9 To dercolonne
                Columns(i).Select
                Selection.EntireColumn.Hidden = True
                Next
                Application.ScreenUpdating = True
                Application.Calculation = xlCalculationAutomatic
         
            End Sub
test non sur la couleur mais sur la valeur de la cellule
A bientôt.


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
danpom302
Step_Three_VBA
Step_Three_VBA

Localisation : Québec
Messages : 426
Date d'inscription : 23/09/2013
Age : 67

Résolu Re: Masquer des colonnes automatiquement

Message par danpom302 le Lun 16 Déc - 0:35

Bonsoir Fhoest,

Merci pour la dernière modification à ton code.

Avec cette dernière version de ton code, ce sont toutes les colonnes de I à MZ qui se sont masquées alors que ça aurait dû être seulement les colonnes de I à MQ, car il y a des cellules de couleur, donc des tâches encore à être exécutées dans les colonnes MR à MZ.

Il faut également prendre en considération que ce planificateur de tâches est évolutif donc, les cellules de couleur bleu vont changer dans le temps selon les dates choisies et selon que les tâches sont ou ne sont pas complétées. Je crois que tu es près du but.

Merci encore une fois pour ton aide.

Dan




avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Lun 16 Déc - 7:04

Bonjour,
ça vient bon...
Code:
Sub Masquer_Colonnes()
         
                Dim c As Range
                Dim derligne As Long
                Dim dercolonne As Long
                Dim lstcolonne As Long
                derligne = Sheets("PlaniTâches (2)").Range("a6").End(xlDown).Row
                lstcolonne = ActiveSheet.UsedRange.Columns.Count
                Application.ScreenUpdating = False
                Application.Calculation = xlCalculationManual
                For Each c In Sheets("PlaniTâches (2)").Range("I6:" & Cells(derligne, lstcolonne).Address)
                        If c.Text = 1 Then
                        dercolonne = c.Column: GoTo ici
                        End If
                       
                Next
ici:
                For i = 9 To dercolonne - 1
                Columns(i).Select
                Selection.EntireColumn.Hidden = True
                Next
                Application.ScreenUpdating = True
                Application.Calculation = xlCalculationAutomatic
         
            End Sub
reste encore un peu de travail la dessus je pense
A bientôt.


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
danpom302
Step_Three_VBA
Step_Three_VBA

Localisation : Québec
Messages : 426
Date d'inscription : 23/09/2013
Age : 67

Résolu Re: Masquer des colonnes automatiquement

Message par danpom302 le Lun 16 Déc - 15:41

Bonjour Fhoest,

Merci pour cette nouvelle version de ton code.

1) Je me suis aperçu que tu ne fais plus référence à la couleur mais plutôt au chiffre 1.

2) Ce code masque toutes les colonnes précédentes à la première colonne contenant des cellules de couleur bleu soit la colonne MR, donc une colonne avec le chiffre 1.

3) Lorsque j'entre la lettre a minuscule dans certaines cellules de la colonne H, à l'effet que toutes les tâches du 12 décembre 2013 sont terminées et que j'exécute la macro de ton dernier code, la colonne MR, soit celle du 12 décembre 2013, se masque.  Very Happy 

4) Il ne me reste qu'à verrouiller ma feuille et à modifier ton code pour déverrouiller et verrouiller la feuille automatiquement. Bien entendu, je vais effectuer d'autres essais afin de m'assurer que le tout fonctionne bien mais pour le moment, c'est super.

Je te tiendrai informé si je rencontre un problème.

Une petite question pour terminer, que veut dire le mot Dim? Je n'ai pas trouver dans mon livre VBA une définition claire sur ce terme.

Merci pour ton implication,

Dan
avatar
phoenixordi
Modérateur
Modérateur

Localisation : sarthe
Messages : 319
Date d'inscription : 24/05/2013
Age : 51

Résolu Re: Masquer des colonnes automatiquement

Message par phoenixordi le Lun 16 Déc - 22:33

bonsoir


Dim est là pour définir la portée de la variable

Dim, Private, Public, ...
voir http://programmer-en-vb.forumactif.org/t39-utiliser-des-variables-et-des-constantes




Dernière édition par phoenixordi le Lun 16 Déc - 22:42, édité 1 fois


_________________
Cordialement
phoenixordi


avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Lun 16 Déc - 22:35

Bonsoir,
Dim = dimension de l'espace alloué à la variable.

edit ptit coucou au passage à Phoenixordi. Smile

A +


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
phoenixordi
Modérateur
Modérateur

Localisation : sarthe
Messages : 319
Date d'inscription : 24/05/2013
Age : 51

Résolu Re: Masquer des colonnes automatiquement

Message par phoenixordi le Lun 16 Déc - 22:43

coucou fred Smile


_________________
Cordialement
phoenixordi


avatar
danpom302
Step_Three_VBA
Step_Three_VBA

Localisation : Québec
Messages : 426
Date d'inscription : 23/09/2013
Age : 67

Résolu Re: Masquer des colonnes automatiquement

Message par danpom302 le Lun 16 Déc - 23:09

Bonsoir Fhoest et phoenixordi,

Merci pour les informations concernant Dim.

Très apprécié,

Dan
avatar
Ronibo
Step_Three_VBA
Step_Three_VBA

Localisation : Creil
Messages : 345
Date d'inscription : 28/06/2013
Age : 23

Résolu Re: Masquer des colonnes automatiquement

Message par Ronibo le Jeu 26 Déc - 17:18

Bonjour,

J'aimerais savoir comment tu as mis les commentaires sur les titres des colonnes.

J'ai cherché dans les menus d'office j'ai pas trouvé Smile

Merci d'avance

A+
avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Jeu 26 Déc - 20:11

Bonjour Ronibo,

Que veux tu dire par commentaire ?

pour moi ce sont les filtres (Onglet Données-Filtres)
si c'est ça que tu cherches

@+


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
Ronibo
Step_Three_VBA
Step_Three_VBA

Localisation : Creil
Messages : 345
Date d'inscription : 28/06/2013
Age : 23

Résolu Re: Masquer des colonnes automatiquement

Message par Ronibo le Ven 27 Déc - 9:07

Bonjour Fhoest, le forum,

Je crois que c'est pas ca.

Regarde l'image ci dessous, tu comprendras Smile



Je joints également son fichier exemple.

A+

http://pvb.comeze.com/Fichier_upload//Equipements_routiers_2013-2.xls
avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Ven 27 Déc - 20:52

Bonjour,

Avec Données-validation des données-messages de saisie (quand cellule sélectionné = coché)

A bientôt.


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
Ronibo
Step_Three_VBA
Step_Three_VBA

Localisation : Creil
Messages : 345
Date d'inscription : 28/06/2013
Age : 23

Résolu Re: Masquer des colonnes automatiquement

Message par Ronibo le Ven 27 Déc - 21:16

Bonsoir,

Merci Fhoest, c'était tout bête lol, pourtant j'ai regardé la bas, mais pas pensé à regarder dans la rubrique à coté ^^

Bonne fête de fin d'année à toi et ta famille. Smile

A+
avatar
AdminPVB
Admin
Admin

Localisation : France Nord 59
Messages : 2033
Date d'inscription : 24/05/2013
Age : 42

Résolu Re: Masquer des colonnes automatiquement

Message par AdminPVB le Ven 27 Déc - 21:22

Bonjour,
merci pour tes vœux, même chose pour toi et ta famille
Bon réveillon. Very Happy 


_________________
Avatar


Bienvenue sur

Dans votre message d'origine cliquer sur le bouton

Tout en bas sur Modifier le titre du sujet cliquer sur le bouton : Résolu !!!
Changer l’icône du sujet par le bouton

Tout simplement.


Merci pour votre présence ou passage sur le site de programmer-en-vb

Celui qui croit tout connaitre, ne connait sans doute pas grand chose,chacun apporte son savoir, mais on a tous tout à apprendre ....  

study

avatar
Ronibo
Step_Three_VBA
Step_Three_VBA

Localisation : Creil
Messages : 345
Date d'inscription : 28/06/2013
Age : 23

Résolu Re: Masquer des colonnes automatiquement

Message par Ronibo le Ven 27 Déc - 21:23

Re,

Merci Fhoest Smile

Contenu sponsorisé

Résolu Re: Masquer des colonnes automatiquement

Message par Contenu sponsorisé


    La date/heure actuelle est Dim 27 Mai - 13:54