用excel從兩組二維數(shù)據(jù)中選出重復(fù)的數(shù)據(jù)？子按鈕1uClick（）Dim arr，k1，k2 with Worksheets（“sheet1”）k1=.[a1].End（4）.行k2=.[a1].E

用excel從兩組二維數(shù)據(jù)中選出重復(fù)的數(shù)據(jù)？

子按鈕1uClick（）Dim arr，k1，k2 with Worksheets（“sheet1”）k1=.[a1].End（4）.行k2=.[a1].End（2）.列arr=.[a1].Resize（k1，k2）End with Dim d，temp，temp1Set d=CreateObject（）腳本。字典“）k=1”“”“””“”“”“”“”“””“””“””對于i=2到k1如果arr（i，j）>0然后temp=temp& “”&& “，”& arr（i，j）Next jd（temp）=d（temp）& “”& arr（i，1）Next i “”“””“”“”“””“””“””“””。對于d中的每個元素，鍵kk=Split（d（element），“””“””。如果UBound（kk）> 1，則k=k 1個單元格（k，1）=元素單元格（k，2）=d（element）End如果你是一個新手

1。fgets函數(shù)可用于讀取文件中某一行的數(shù)據(jù)。某一列的數(shù)據(jù)必須在每行的前幾個字符中逐個讀取，然后存儲在字符串中。2常規(guī)：包括。H>#包含<string。H>void main（）{char a[100]，B[100]，C[100]int i=3，j=4，k=0//第三行，第四列文件*FP=fopen（”數(shù)據(jù).txt“，”R”）while（fgets（C，100，F(xiàn)P））{//讀取每行數(shù)據(jù)I--if（I==0）strcpy（a，C）//讀取第三行數(shù)據(jù)B[k]=C[J-1]//將每行的列字符復(fù)制到B}B[k]=0 printf（“第%d行中的數(shù)據(jù)：sn”，I，a）printf（“第%d列中的數(shù)據(jù)：sn”，J，b）Fclose（FP）}