Discussion :

[Mr l'Ashanti]

Bjr forum. Bjr Patrick Toulon...et les autres pros
J'avais posté sur la modification d'une BD avec le code qui fonctionnait et après non plus.
Après plusieurs hypothèses j'ai voulu savoir si il était possible d'associer la récupération des numéros de lignes a la listbox. Exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
dim i as integer= listbox.listindex+2 ' pas d'en-tête pour la listbox
With sheets(" source ")
.range("A"& i ,ligne.value)=textbox
End with

[patricktoulon]

bonjour niamké
non ca s'ecrit pas comme ca

tout d'abors ton dim
dim i as integer= listbox.listindex+2 ' pas d'en-tête pour la listbox

c'est comme ca que l'on ecrit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim i as integer
i= listbox.listindex+2 ' pas d'en-tête pour la listbox

ensuite ton range

la je ne comprends pas ce que tu veux faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With sheets(" source ")
.range("A"& i ,ligne.value)=textbox
End with

1. confondrais tu pas listbox.listindex avec listbox.value
2. voudrais tu transférer ton textbox dans la cellule en colonne A correspondant a la valeur de la listbox au quel cas il faut faire un find
3. ligne c''est quoi un textbox une listbox
4. quand on utilise l'object range addressé en string on utilise la lettre colonne et numero de ligne il n'y a pas de 3°argument

[Mr l'Ashanti]

Ligne= textbox
Ce textbox récupère le numéro de la ligne se trouvant dans la feuille excel. J'ai utilisé la fonction ligne()
En fait ce code fonctionnait bien. Mais depuis un moment quand je modifie les données, rien ne se passe. Ce pourquoi j'ai voulu savoir si on pouvait concaténer avec les numéros de lignes

Tu pourrais jeter un coup d'oeil au sujet que j'avais posté

Modifier une base de données via une listbox et rafraichir la lisbox

[patricktoulon]

re
regarde cette discussion
https://www.developpez.net/forums/d1.../#post10498147

[Mr l'Ashanti]

Dans l'autre poste un modérateur me l'a déjà proposé mais ce n'est pas ,si je me le permets, ce que je voudrais. J'ai essayé d'étudier en profondeur mais je n' ai pas pu l'adapter ou trouver des éléments directeurs.

[boisgontierjacques]

Bonjour,

>Après plusieurs hypothèses j'ai voulu savoir si il était possible d'associer la récupération des numéros de lignes a la listbox

Le principe consiste à stocker le numéro d'enregistrement dans la ListBox:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  TblBD = Range(NomTableau).Resize(, NbCol + 1).Value          ' Array: + rapide
  For i = 1 To UBound(TblBD): TblBD(i, NbCol + 1) = i: Next i  ' No enregistrement

Exemple en PJ


Boisgontier