1樓：匿名使用者
sub pd()
'定義一個函式為"pd",用來寫一個判斷程式
dim x, y, z, i as integer
'定義變數x, c, y, z, i為整形
dim xx, yy, zz as string
'定義變數xx, yy, zz為文字字元型
for z = 2 to 3
'msgbox("定義變數z為行迴圈次數，這裡只需要迴圈判斷2行資料，即第二行至第三行")
x = len(sheet1.range("b" & z))
'msgbox ("定義變數x為計算b2單元格的長度")
y = len(sheet1.range("c" & z))
'msgbox ("定義變數y為計算c2單元格的長度")
zz = ""
'msgbox ("清空變數zz的值，為下一行得數做準備")
for i = 1 to x
'msgbox ("定義變數i為迴圈，從1開始，次數為每行b列單元格的欄位長度")
for i = 1 to x
if x <> y then
exit for
end if
'判斷如果量個資料長度不同，則直接跳出迴圈，不進行計算
xx = mid(sheet1.range("b" & z), i, 1)
'定義變數xx為b列每行從左至右每次取得一位數字字元
yy = mid(sheet1.range("c" & z), i, 1)
'定義變數yy為c列每行從左至右每次取得一位數字字元
if (xx = "2" or xx = "3") and (yy = "2" or yy = "3") then
'進行判斷
zz = zz & 1
'判斷為真的情況下賦值加上「1」這個字元
else
zz = zz & 0
'判斷為假的情況下賦值加上「0」這個字元
end if
next i
'i迴圈結束繼續跳轉到z迴圈
sheet1.range("d" & z) = "'" & zz
'賦值每行比較後得到的結果值至每行d列
next z
'z迴圈結束
end sub
'判斷程式的結束
2樓：平陽虎
給個思路：用字元數之間的迴圈
excel vba 裡怎麼將字串轉換為數值
3樓：湖人總冠軍
1、用value函式bai將字元型數字轉換成
du數字型，
value函式可以將表zhi示數字dao的文字字回符串轉換為數字，它的答語法結構是：value（text），value函式只有一個引數text，表示要轉換為數字格式的文字，文字引數可以直接引用雙引號中的文字，也可以引用其他單元格中的文字。
2、用四則運演算法將字元型數字轉換成數字型，可以使用+0、-0、*1、/1將字元數轉換為數字。
3、數字型數字轉換成文字型，
使用文字函式將數字轉換為文字型別，
文字函式的基本語法格式：text（value，format﹐text），
值：是數值、計算結果為數值的公式或對包含數值的單元格的引用。
格式文字：用作帶引號的文字字串的數字格式。
例如：c2=文字（b2,0），它變為文字型別。
4、用&「」將數字型數字轉換成文字型，例如：a3=b3&；「」轉換為文字型別。
5、在數字型別編號之前新增文字識別符號「或」，例如：d2=」，c2=d2&；b2，它將被轉換為文字型別編號。
4樓：匿名使用者
1、用value函式將字元型數字轉換成數字型，
value函式可以將代表數字的文字字串轉換成數字，其語專法結構屬
為：value(text),value函式只有一個引數text，表示需要轉換成數值格式的文字。text引數可以用雙引號直接引用文字，也可以引用其他單元格中的文字。
2、用四則運演算法將字元型數字轉換成數字型。
可以用+0，-0，*1，/1來將字元型數字轉換成數字型數字。
3、數字型數字轉換成文字型，
用text函式將數字型數字轉換成文字型，
text函式的基本語法格式：text(value,format_text)，
value：為數值、計算結果為數字值的公式，或對包含數字值的單元格的引用。
format_text：是作為用引號括起的文字字串的數字格式。
例如：c2=text(b2,0),就變成了文字型。
4、用&「」將數字型數字轉換成文字型，例如：a3=b3&"",就轉換成了文字型。
5、在數字型數字前加上文字識別符號「或』，例如：d2="'",c2=d2&b2,就轉換成文字型數字。
5樓：匿名使用者
如果是純數值型字串可以直接用 函式val()轉換
如果包含字母，漢字等，則需要先擷取數值那部分，然後用val 轉換
6樓：匿名使用者
sub 處理()
a = "nd5319gjyz-2011000475"
b = left(a, 17) & format(cint(right(a, 4)) + 2, "0000")
msgbox b
end sub
excel vba 將數字轉換成字串的函式是哪個
7樓：情惑美文
一、首先開啟excel文件。如下所示，
二、將滑鼠放在要輸入函式的單元格中，然後在選單欄中選擇「公式」，在「公用選單欄」中選擇「插入函式」。如下所示，
三、然後彈出「插入函式」對話方塊，選擇要查詢「numberstring」函式的函式。此時，您可以看到以下對其功能的具體描述，然後單擊「確定」。如下所示，
四、此時可以設定numberstring函式的引數，設定「value」和「option」。計算結果可以在下面預覽。設定完畢後點選「確定」。如下所示，
五、此時，單元格中充滿了漢字。您可以在編輯欄中看到此函式公式。如下所示，
六、第二個引數是數值。每個引數的變化都代表不同的內容。詳見下圖。
8樓：匿名使用者
1、首先開啟excel文件。如下圖，
2、將滑鼠定位在你要輸入函式的單元格中，然後選擇選單欄裡的「公式」，在常用選單欄裡選擇「插入函式」。如下圖，
3、然後彈出插入函式對話方塊，再選函式中找到「numberstring」函式，這時可以看到下面對其函式的具體介紹，再點選「確定」。如下圖，
4、這時我們就可以設定numberstring函式的引數，可以設定「數值」和「選項」，下面有計算結果可以預覽，設定好後點選「確定」。如下圖，
5、這時單元格里就是中文字元了，可以從編輯欄裡看到此函式公式。如下圖，
6、其中第二引數均為數值，每改變一個引數將代表的是不同的內容。具體如下圖。
9樓：匿名使用者
將數字轉換成字串的函式是cstr函式，比如dim a as integer
a = 123
msgbox cstr(a) 彈出的就是123字串
如何用vba取電子**單元格中的字元的n位資料?
10樓：依然特雷西
1、excel中有資料如下圖所示，將所有的資料合併到b1單元格中。
2、按下alt+f11，開啟vba編輯介面，雙擊資料所在的工作表，如下圖所示。
3、輸入**如下圖所示：sub 魚目混珠() range("b1") = range("a1") & range("a2") & range("a3") & range("a4") end sub。
4、點選執行子程式按鈕，如下圖所示。
5、關閉vba編輯介面，返回到excel中，就可以看到a1:a4的內容合併到了b1單元格中，如下圖所示。
11樓：魚木混豬喲
vba中也可以用mid函式提去字元的n位資料軟體版本：office2013
舉例說明如下：
1.從下表e列資料中，提取第2位開始的5位資料：
2.alt+f11，在相應工作表中輸入**如下：
3.f5執行**，即可提取出相應的資料來：
12樓：匿名使用者
mid(需要提取的字串,從左邊算起提取的第一個字元的位置的數字,提取字元的個數數字)
例如：tt = "abcdefgh"
xx = mid(tt,4,2)
xx的返回值為："de"
13樓：黑桃5悲鳴
巨集-錄製巨集-使用公式mid(a1,3,2),下拉填充-停止
這樣的話就錄好了這樣的巨集
14樓：匿名使用者
sub aaa()
msgbox mid(range("a1").text,n,1) 'n就是第幾個字元，自己修改即可。
end sub
excel vba中，如何實現當a列中的資料，1158開頭或555開頭或字元長度為7時，d列相對應的行，顯示值為p
15樓：匿名使用者
sub test()
for r = 1 to range("a65536").end(xlup).row
tmp = range("a" & r)
if left(tmp, 4) = "1158" or left(tmp, 3) = "555" or len(tmp) = 7 then
range("d" & r) = "p"
end if
next
end sub
16樓：
函式不行？
d1=if(or(--left(a1,4)=1158,--left(a1,3)=555,len(a1)=7),"p","")
下拉公式
在excel中如何用vba來實現查詢特定的字串？
17樓：很多很多
1、首先bai開啟需要編輯的excel**，du進入到編zhi輯的的頁面中。
2、然後在彈dao出來的視窗
回中，滑鼠右鍵答單擊工作表，選擇開啟「檢視**」。
3、然後在彈出來的視窗中，點選輸入**：
sub aaa()
dim i as long
for i = 1 to 1000 '行 範圍，自己修改if instr(range("a" & i), "invalidstatus") > 0 then
range("a" & i).font.color = vbredend if
next
end sub
4、然後進行儲存，點選執行就完成了。
18樓：匿名使用者
sub aaa()
dim i as long
for i = 1 to 1000 '行 範圍bai，自己修
du改if instr(range("a" & i), "invalidstatus") > 0 then
range("a" & i).font.color = vbredend if
next
end sub
執行後含有這zhi個字dao
符的單元格
內字型為紅容色。
excel用vba提取字串
19樓：築夢
可以使用函式提取一個字串中的一段字元。 mid 用來返回文字字串中從指定位置開始的特定數目的字元,該數目由使用者指定， 函式 mid 始終將每個字元。
應該用到三個字串函式：left、right、midleft函式用法：left（要提取字元所在單元格,從左側開始提取的個數)。
right函式用法：right(要提取字元所在單元格,從右側開始提取的個數）。
mid函式用法：mid(要提取字元所在單元格,開始位置，提取個數）。
求資料處理軟體或資料處理方法，資料處理經歷了哪幾個階段？
這個的話建議還是選擇finereport 它兼顧了基本的資料錄入與展現功能，一般的資料來源都支援，學習成本比較低，比較多人的選擇 最基礎的就是使用excel，如果要高階一些，就用spss等等軟體，網上都有教程，建議使用excel，因為使用方便，簡單易用。excel處理相當不錯，我的物理實驗 就用的他...
大學物理實驗資料處理方法
摘要 實驗結果的表示，首先取決於實驗的物理模式，通過被測量之間的相互關係，考慮實驗結果的表示方法。常用到資料處理方法有作圖法，列表法，平均值法，最小二乘法等。在處理資料時可根據需要和方便選擇任何一種方法表示實驗的最後結果。1 實驗結果的圖形表示法。把實驗結果用函式圖形表示出來，在實驗工作中也有普遍的...
資料組合篩選！程式設計？資料處理，SQL組合篩選問題
python l 1,2,8 1,2,18 2,8,4 2,8,31 2,9,13 2,9,18 2,9,23 3,16,15 3,16,18 3,16,28 3,16,32 3,17,15 4,11,6 4,11,8 4,11,9 4,11,15 4,11,18 4,11,22 8,3,28 8,...