Discussion :

[antoine2933]

Bonjour à tous !!

Je viens chercher de l'aide sur une fonction, macro qui permettrait de rechercher dans une cellule les caractéres que l'on trouve dans une autre.
Afin d'être plus clair rien ne vaut un exemple :-)

Rechercher les infos de la colonnes COL_2

COL_1	COL_2	CARACTERES_PRESENTS	DIFFERENCE
AZERTY	TYTREZA	oui	0
AZERTY	TYTREZ	oui	1
AZORTU	AZERTY	non	2
122	TYT122	oui	3

En espérant qu'une solution existe :-D.

Merci !!!!

[jlp65]

Bonjour,

Il n'est pas nécessaire de passer par une macro pour faire ça.
De plus, l'énoncé du problème ne dit pas précisément quel doit être le nombre de différences affiché : Nombre de caractères de COL1 absents dans COL2, ou bien Nombre de caractères de COL2 absents dans COL1, ou encore (plus probablement ?) le max de ces deux différences : c'est la solution proposée ici :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
/* Table de test */
data test;input col1 $ col2 $; cards;
AZERTY TYTREZA 
AZERTY TYTREZ 
AZORTU AZERTY 
122 TYT122 
;
run;
/* Calcul des variables de contrôle */
data test(drop=indice caractere diff1 diff2);set test;	
	diff1=0;diff2=0;
	do indice = 1 to length(col1);
		caractere = substr(col1,indice,1);
		if index(col2,compress(caractere)) = 0 then diff1+1;
	end;
	do indice = 1 to length(col2);
		caractere = substr(col2,indice,1);
		if index(col1,compress(caractere)) = 0 then diff2+1;
	end;
	diff=max(diff1,diff2);
run;
proc print;run;

Cordialement