XL 2010 Base de données

TaharGhita · 12 Mars 2020

Bonjour Team,

Me voilà je sollicite l'aide des experts.
J'essaye de faire une base de données des employés,
Ci joint deux classeurs :
1fichier avec les données de chaque employé (nom. Prénom. Adresse....)
2 fichier un classeur sur lequel je dois saisir manuellement les données et à l'aide d'un macro je tape un mot clé et par la suite il me fait sortir la fiche de l'employé.
Je me bloque sur le faite que je dois terminer le copier coller du fichier 1 vers le 2 fichier.
La mise en forme est assez médiocre et conception est pas bonne et non présentable.

Pourriez vous m'aider pour corriger et trouver une solution à mes problèmes ?
Je compte le mettre accessible depuis une adresse (URL) est ce que c'est possible ?

Merci d'avance pour votre réponse et aide.

Nairolf · 12 Mars 2020

Salut TaharGhita,

Tu n'as joins qu'un seul fichier alors que tu indiques en avoir mis 2 !?

BOISGONTIER · 12 Mars 2020

Bonjour,

cf PJ

Boisgontier

TaharGhita · 12 Mars 2020

BOISGONTIER à dit:
Bonjour,

cf PJ

Boisgontier

Merci infiniment .

une aide stp comment je peux maintenant faire la recherche avec avoir enregistrer les elements?

BOISGONTIER · 12 Mars 2020

En appuyant sur le bouton Validation modif

Boisgontier

TaharGhita · 12 Mars 2020

BOISGONTIER à dit:
En appuyant sur le bouton Validation modif

Boisgontier

Malheureusement j'ai une image non cliquable ci-dessous:

TaharGhita · 12 Mars 2020

SVP qui pourra m'aider ??? je suis bloqué

BOISGONTIER · 12 Mars 2020

Pour la recherche:
1/ Il y a 6 comboboxs
2/ Recherche intuitive dans le ListBox avec la Textbox

C'est un pgm générique;

On peut modifier

Code:

 ColCombo = Array(1, 2, 3, 4, 5, 6)                           ' A adapter (1 à 6 colonnes maxi)
 colVisu = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17) ' Colonnes ListBox (à adapter)
 colInterro = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17) ' colonnes à interroger (adapter)

VB:

 ColCombo = Array(1, 2, 3, 4, 5, 6)                           ' A adapter (1 à 6 colonnes maxi)
colVisu = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17) ' Colonnes ListBox (à adapter)
colInterro = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17) ' colonnes à interroger (adapter)

Boisgontier

TaharGhita · 12 Mars 2020

BOISGONTIER à dit:
Pour la recherche:
1/ Il y a 6 comboboxs
2/ Recherche intuitive dans le ListBox avec la Textbox

VB:

ColCombo = Array(1, 2, 3, 4, 5, 6) ' A adapter (1 à 6 colonnes maxi) colVisu = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17) ' Colonnes ListBox (à adapter) colInterro = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17) ' colonnes à interroger (adapter)

Boisgontier

J'ai pas la la main pour lancer la recherche dpuis la feuille accueil, voila le fichier en PJ

BOISGONTIER · 12 Mars 2020

Dans le fichier joint, les macros ont disparues

Boisgontier

TaharGhita · 12 Mars 2020

BOISGONTIER à dit:
Dans le fichier joint, les macros ont disparues

Boisgontier

Je ne sais plus quoi faire !!!

TaharGhita · 12 Mars 2020

TaharGhita à dit:
Je ne sais plus quoi faire !!!

N'y a pas un problème sur Excel dans mon ordinateur ?

XL 2010 Base de données

TaharGhita

XLDnaute Nouveau

Pièces jointes

Nairolf

XLDnaute Accro

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

TaharGhita

XLDnaute Nouveau

BOISGONTIER

XLDnaute Barbatruc

TaharGhita

XLDnaute Nouveau

TaharGhita

XLDnaute Nouveau

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

TaharGhita

XLDnaute Nouveau

Pièces jointes

BOISGONTIER

XLDnaute Barbatruc

TaharGhita

XLDnaute Nouveau

TaharGhita

XLDnaute Nouveau

Discussions similaires