econs
Messages postés4030Date d'inscriptionmardi 13 mai 2003StatutMembreDernière intervention23 décembre 2008
-
17 juin 2005 à 09:32
cs_AMIX
Messages postés3Date d'inscriptionlundi 23 mai 2005StatutMembreDernière intervention16 août 2005
-
15 août 2005 à 13:43
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
cs_AMIX
Messages postés3Date d'inscriptionlundi 23 mai 2005StatutMembreDernière intervention16 août 2005 15 août 2005 à 13:43
Votre programme est génial.J'en ai fais un pareil pour une application personnelle de saisie de factures de ventes; mais votre méthode, digne d'un professionnel, m'a montré le gouffre de mon ignorance.Merci pour votre générosité.
BENCHLIKHA Abderrahmane, marocain, 61 ans.
mtassaout@hotmail.com
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 11 août 2005 à 17:26
OK je modifi pas le post pour des raisons perso (je n'en veux pas) mais pour ceux que cela interresse c'est très simple, vous devez rajouter les lignes suivantes :
kokise
Messages postés120Date d'inscriptionjeudi 5 mai 2005StatutMembreDernière intervention21 décembre 2017 11 août 2005 à 15:29
non non c sa
kokise
Messages postés120Date d'inscriptionjeudi 5 mai 2005StatutMembreDernière intervention21 décembre 2017 11 août 2005 à 15:22
désolé trompé de destination !!!!
kokise
Messages postés120Date d'inscriptionjeudi 5 mai 2005StatutMembreDernière intervention21 décembre 2017 11 août 2005 à 15:22
Salut ton prog est bien mais je pense qu'on est obligé de cliquer sur entrer pour valider chaque saisie je pense qu'un changement de sélection sur la colonne c à d cliqué sur une autre colonne doit faire l'effet de l'entrer ça serai mieux.
rabihos
Messages postés3Date d'inscriptionjeudi 16 juin 2005StatutMembreDernière intervention29 juin 2005 29 juin 2005 à 15:47
merci kant meme
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 29 juin 2005 à 15:42
désolé je ne pense pas pouvoir t'aider
rabihos
Messages postés3Date d'inscriptionjeudi 16 juin 2005StatutMembreDernière intervention29 juin 2005 29 juin 2005 à 10:19
bjr bouv,
modbus est un protocol , c un protocol de communication
voilà ..
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 24 juin 2005 à 21:10
qu'est ce que modbus ?
rabihos
Messages postés3Date d'inscriptionjeudi 16 juin 2005StatutMembreDernière intervention29 juin 2005 24 juin 2005 à 15:59
bjr , est ce kelkun a une idée cmt faire pr envoyer des donnnés sur excel vers modbus en utilisant visuel basic ?
merci d avance
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 22 juin 2005 à 13:18
Nouvelle MAJ dispo avec prise en charge des touches F2 et F5.
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 21 juin 2005 à 20:58
OK COPIER/COLLER opérationnels.
Avec en plus prise en charge des touches SUPPR et Backspace ; et nagivation en arriere avec SHIFT+TAB.
Enfin j'ai mis le texte en bleu pour la cellule en surbrillance car en blanc on voyait pas grand chose.
Bonne prog
++
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 20 juin 2005 à 07:52
Ouai j'y avais pas pensé. Je fais ça ce soir en rentrant du boulot ! Aucun de problème.
Pas mal, mais il y a un bug: l'affectation des propriete n'est pas correcte, aulieu d'affecter le parametres tu affecta la propriete elle meme.
par exemple aur lieu d'écrire
Public Property Let Cols(ByVal New_Cols As Integer)
Grille.Cols = Cols
End Property
Il vaudrait mieux écrire ça
Public Property Let Cols(ByVal New_Cols As Integer)
Grille.Cols = New_Cols
End Property
et ça pour "Rows" aussi
bouv
Messages postés1411Date d'inscriptionmercredi 6 août 2003StatutMembreDernière intervention 3 mars 20191 17 juin 2005 à 13:57
Econs>> Effectivement les num de ligne ne s'incrementent pas automatiquement. En fait ce n'est pas un bug, on peut nommer chaque ligne comme on le souhaite. L'idée était bien de rendre la FlexGrid saisissable.
Pour l'explication finale effectivement j'ai essayé de dessiner un truc, mais il semble que quand 2 espaces se suivent, celui de trop est supprimé. Cela ne vient pas de ton explorateur. Je modifierai ça.
Merci pour ton commentaire.
Bonne prog
++
econs
Messages postés4030Date d'inscriptionmardi 13 mai 2003StatutMembreDernière intervention23 décembre 200824 17 juin 2005 à 09:32
Piti bug :
Quand on rajoute des lignes, les numéros de lignes ne s'incrémentent pas dans la première colonne.
A part çà, c'est très bon ! :o)
Et remanie un peu ton explication finale. Tu as surement voulu dessiner quelque chose avec de l'ascii, mais là, c'est super moche (depuis mon browser en tous cas) :o)
15 août 2005 à 13:43
BENCHLIKHA Abderrahmane, marocain, 61 ans.
mtassaout@hotmail.com
11 août 2005 à 17:26
Sous Option Explicit
Dim sRow As String
Dim sCol As String
A la fin de Grille_KeyDown et Grille_KeyPress
sRow = Grille.Row
sCol = Grille.Col
Au début de Private Sub Grille_Click()
Grille.TextMatrix(sRow, sCol) = txtSaisie.Text
txtSaisie.Text = ""
txtSaisie.Visible = False
sRow = Grille.Row
sCol = Grille.Col
++
11 août 2005 à 15:29
11 août 2005 à 15:22
11 août 2005 à 15:22
29 juin 2005 à 15:47
29 juin 2005 à 15:42
29 juin 2005 à 10:19
modbus est un protocol , c un protocol de communication
voilà ..
24 juin 2005 à 21:10
24 juin 2005 à 15:59
merci d avance
22 juin 2005 à 13:18
21 juin 2005 à 20:58
Avec en plus prise en charge des touches SUPPR et Backspace ; et nagivation en arriere avec SHIFT+TAB.
Enfin j'ai mis le texte en bleu pour la cellule en surbrillance car en blanc on voyait pas grand chose.
Bonne prog
++
20 juin 2005 à 07:52
19 juin 2005 à 23:27
Mais bon c'est tellement pratique .
18 juin 2005 à 13:39
18 juin 2005 à 13:34
17 juin 2005 à 19:11
par exemple aur lieu d'écrire
Public Property Let Cols(ByVal New_Cols As Integer)
Grille.Cols = Cols
End Property
Il vaudrait mieux écrire ça
Public Property Let Cols(ByVal New_Cols As Integer)
Grille.Cols = New_Cols
End Property
et ça pour "Rows" aussi
17 juin 2005 à 13:57
Pour l'explication finale effectivement j'ai essayé de dessiner un truc, mais il semble que quand 2 espaces se suivent, celui de trop est supprimé. Cela ne vient pas de ton explorateur. Je modifierai ça.
Merci pour ton commentaire.
Bonne prog
++
17 juin 2005 à 09:32
Quand on rajoute des lignes, les numéros de lignes ne s'incrémentent pas dans la première colonne.
A part çà, c'est très bon ! :o)
Et remanie un peu ton explication finale. Tu as surement voulu dessiner quelque chose avec de l'ascii, mais là, c'est super moche (depuis mon browser en tous cas) :o)