1樓：勒粵嘟呀戲
我好像記得是可以的，但是我忘了，
不過可以換個思路，用它所在位置來推理出應該在那個行。
效果如下：
sub 巨集2()
a = activesheet.shapes("button 1").top
for i = 1 to 10
myt = cells(i, 1).heightmytop = mytop + myt
if mytop > a then
exit for
end if
next
msgbox ("應該在行:" & i)
end sub
2樓：鶴嶼遷歸
turtle庫手冊可以查詢查詢 python圖形繪製庫turtle中文開發文件及示例大全，手冊中現有示例，不需要自己動手就可以檢視演示。
使用turtle畫樹，看了一下網上的**，基本上核心的方法是使用遞迴；其次通過遞迴傳參更筆的粗細從而改變繪製時的線段，更改樹的軀幹大小，在遍歷到最後一個節點時，更改筆的顏色及粗細，繪製出樹尖的花瓣或綠葉。
本篇博文使用的是網上的**修改而成的，基本上寫來寫出簡單編寫也是使用遞迴，我也就拿過來用了。本來想順便把環境也繪製一遍，但是明天上班了，今天還有別的事，就只能作罷，有時間再寫一篇把環境都弄好的案例吧；下面是最終**執行後的結果
如何在vba中得到當前單元格的行號和列號
3樓：魚木混豬喲
軟體版本：office2013
方法如下：
alt+f11，輸入**如下：
selection代表選擇的單元格
row屬性可得到起行號；column可得到起列號2.f5執行**，即可得到當前單元格的行號和列號：
4樓：戴雯君
dim ks as range
set ks = range("d2")
lie = ks.column
hang = ks.row
你宣告瞭ks是單元格物件，就不能用ks=d2這麼寫了只能用set給ks賦值一個單元格。而且系統預設d2是變數。字串要加雙引號。
或者你可以這樣寫
dim ks
ks = "d2"
lie = range(ks).columnhang = range(ks).row
5樓：宋棋雨
在vba中,單元格不用定義變數直接可用range引用單元格表示要用字串表示
ks="d2"
lie = range(ks).row
vba如何得到選中的多行 的行號和列號
6樓：匿名使用者
選中一行，選中連線多行，選中不連線多行都適用，請測試：
(剛才的有問題，又改了一下)
sub b()
if selection.address like "*,*" then
p = split(selection.address, ",")for i = lbound(p) to ubound(p)q = split(p(i), "$")
msgbox q(ubound(q))
next
else
p = split(selection.address, "$")for i = replace(p(1), ":", "") to p(2)
msgbox i
next
end if
end sub
這是選中整行的，如果你選中的是區域就有問題，有問題的話q我的excel群找吧，這裡不讓再改了——84253041
如何通過vba獲取當前單元格所在行和列
7樓：很多很多
1、將單元格所選單元格的行號和列號，分別用vba顯示在下面的兩個單元格中，
2、按下alt+f11，開啟vba編輯介面，選擇當前工作表編寫**，4、下面**是得到當前單元格的列號並放到當前單元格下面第二個單元格中：
5、**編寫完成，點選執行子過程按鈕（或按下f5），6、最後返回excel中，就可以看到得到了當前單元格的行號和列號，
8樓：戴雯君
dim 行, 列
列 = cells.find("要找的資料").column行 = cells.
find("要找的資料").rowmsgbox "要查詢的資料在" & 行 & "行" & 列 & "列"
9樓：匿名使用者
activecell.row 『活動單元格所在的行數
activecell.column 『活動單元格所在的列數
10樓：匿名使用者
參考思路如下：
function rc_test(a)
on error resume next
rc_test = a.row & "/" & a.columnend function
excel vba 如何找到某一資料的行號和列號？
11樓：匿名使用者
先定義一個rng變數，在該列非空單元格中迴圈；
再定義一個str變數，用於存放符合條件的單元格地址；
if rng=指定條件 then
str=rng.address & str & ","
end if
最後去掉str的最後一個逗號，寫入位置或者msgbox顯示
12樓：香格里拉稻草人
**在附件,原始碼開放,d1單元格為需要查詢的字元,點選按鈕顯示符合條件的全部行號和列號
13樓：
那重複的是要哪一行？這種你要說清楚哦
excel vba 如何獲得活動單元格所在行的行號
14樓：匿名使用者
'單元格觸發事件
private sub worksheet_selectionchange(byval target as range)
if target.count = 1 thenmsgbox "當前單元格的行號是:" & target.rowend if
end sub
用命令按鈕的巨集:
sub yy()
msgbox "當前單元格的行號:" & activecell.row
end sub
15樓：匿名使用者
activecell.row 活動單元格所在的行數
activecell.column 活動單元格所在的列數
vba中如何取得行號和列號如何選定這一範圍的值
16樓：匿名使用者
public sub aaa()
'取得b5的 行號 和 列號 ，並寫入資料s = "b5"
r = range(s).row
c = range(s).column
cells(r, c).value = 5'選定 a1:b5 單元格區域
range(cells(1, 1), cells(r, c)).select
'選定 a2:b5 單元格區域
range(range("a2"), cells(r, c)).select
'選定 a3:b5 單元格區域
range([a3], cells(r, c)).select'選定 b5右下方（含b5） 共2行3列 的 單元格區域，即 b5:d6
[b5].resize(2, 3).select'……end sub
17樓：匿名使用者
sub show()
debug.print selection.column,selection.row
selection.entirerow.selectend sub
excle vba，如何查詢一個已知值的行號和列號？
18樓：姓王的
set rng=cells.find("日期")'查詢含有「日期」的單元格
if not rng is nothing then『如果找到ro=rng.row』行號
co=rng.column『列號
end if
19樓：匿名使用者
標籤裡有個單元格是「日期」
這句話是什麼意思？
20樓：匿名使用者
activecell.row
activecell.colunm
excel巨集中如何獲取新增按鈕的屬性
方法一 你用的是表單控制元件中的按鈕，每個按鈕指定巨集，10個按鈕得指定10個巨集，巨集的名稱為 buttonattribute i，然後再定義10個巨集。public bod 100 sub addbutton dim str for i 1 to 2 set bod i activesheet....
c如何獲取滑鼠選取的內容，VBA裡，如何獲取滑鼠座標？
獲取滑鼠選取的內容，可以通過截圖的方式，以 的形式進行儲存。截圖方法可藉助qq截圖功能，一般快捷按鍵 ctrl alt a。或通過瀏覽器的截圖功能 截圖方法 1 按截圖快捷鍵 或點選瀏覽器 截圖 按鈕後，選取需要需要的內容，劃定範圍後，雙擊被選擇的區域，選取的內容以 的形式被儲存在剪貼簿。2 執行 ...
在excel中如何使用vba的巨集
保護公式可以這樣 選擇不需要保護 需要錄入內容 的單元格，設定單元格屬性，最後一個 保護 卡里面的 鎖定 取消，其它那些沒有取消鎖定的有公式的單元格自然是鎖定狀態。下一步是在工具 審閱 新版本 或者 工具 選單 舊版本 裡面選擇 保護工作表 設定一個密碼後確認。完成這兩步之後，鎖定的單元格內容就無法...