× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 copie automatique d'un champ vers un autreeSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
pioupioute
  Posté le 26/02/2011 @ 17:04 
Aller en bas de la page 
Nouvelle astucienne

Bonjour,J'ai une table avec champs

L'un Nommé (champ1) Nom, l'autre (champ 2) Nom père.

quand j'écris ex: MARTIN dans le champ 1, je voudrais qu'access me l'inscrive automatiquement dans le champ 2.

Comment faire S.V.P (je débute, soyer indulgent)

Merci

Publicité
rj390111
 Posté le 27/02/2011 à 09:16 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

Dans le formulaire d'encodage

Sur l'évènement Perte focus du champ1 écrire le code suivant.

Sub champ1_Lost_Focus()

If IsNull(Me!Champ2) Then

Me!Champ2 = Me!Champ1

End sub

Le If IsNull teste si le champ2 est vide avant d'y copier le nom du père, car il peut arriver actuellement qu'un enfant porte le nom de la mère et pas celui du père.

pioupioute
 Posté le 27/02/2011 à 10:45 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvelle astucienne

Merci à RJ,

Vous avez oubliez de dire qu'il fallait aussi le End If.

Pour que ça marche il faut :

Sub champ1_Lost_Focus()

If IsNull(Me!Champ2) Then

Me!Champ2 = Me!Champ1

End If

End Sub

et voilà, le tour est joué

Encore merci et bonne journée

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
100,99 €Ecran 24 pouces Samsung S24F354 (Full HD, PLS, 4 ms, FreeSync) à 100,99 €
Valable jusqu'au 07 Juillet

Amazon propose actuellement l'écran 24 pouces Samsung S24F354 à 100,99 € livré gratuitement alors qu'on le trouve ailleurs à partir de 120 €. Cet écran dispose d'une dalle PLS Full HD (1920x1080) et offre un temps de réponse de 4 ms. Il possède des entrées VGA et HDMI. Il possède des fonctions d'anti scintillement et anti lumière bleue. 


> Voir l'offre
29,99 €Clavier et Souris sans fil Microsoft Wireless Desktop 900 à 29,99 €
Valable jusqu'au 05 Juillet

Amazon fait une promotion sur le pack Microsoft Wireless Desktop 900 qui passe à 29,99 € livré gratuitement alors qu'on le trouve ailleurs à partir de 45 €. Cet ensemble clavier/souris Microsoft Wireless Desktop 900 est à la fois contemporain et minimaliste. Le clavier est doté de touches silencieuses offrant une expérience de frappe sereine et la souris de taille classique permet une navigation confortable et précise. Le clavier Wireless Desktop 900 est doté du chiffrement AES (Advanced Encryption Standard), qui vous permet de protéger vos informations en chiffrant votre saisie. La durée de vie de la pile est de 2 ans pour le clavier et pour la souris.


> Voir l'offre
9,91 €Hub 4 ports USB 3.0 à 9,91 €
Valable jusqu'au 05 Juillet

Amazon propose actuellement le hub Anker 4 ports USB 3.0 à 9,91 € alors qu'on le trouve habituellement autour de 15 €. 


> Voir l'offre

Sujets relatifs
Copie automatique de excel vers excel ou word
Copie de texte vers LibreOffice toujours en texte simple
Défaut de copie gmail vers Word
Copie Excel vers Visio
Copie automatique tableau EXCELL 2007
Recopie automatique de feuilles vers une seule
macro copie d'un fichier xls vers xls
copie de lignes en collones automatique..........
copie de colonne vers une autre feuille avec condi
champs ville--->champ code postal automatique
Plus de sujets relatifs à copie automatique d''un champ vers un autree
 > Tous les forums > Forum Bureautique