当前位置:编程学习 > VB >>

vba问题!!

Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim i, j As String

i = Target.Text

j = Target.Text

m = Target.Value

Range(m).Interior.ColorIndex = 4  '我想让所在单元格里填写的数据读出来,作为我要染色的目标地址,应该怎么改。。


End Sub

--------------------编程问答-------------------- 求高手指点啊!!!急急急,万分感激阿 --------------------编程问答-------------------- 没明白你的意思。

-_-!!!
--------------------编程问答-------------------- 写 vba 是可以打 断点 和 应用系统进行 操作的 你可以点击 录制宏 然后 重复 需要的操作 系统会 给你生成 vba的代码 然后 你根据 这些代码来更改 你的程序 。 --------------------编程问答-------------------- 已经知道怎么改了。。昨天怎么尝试都不可以,但是不知道今天就可以了。。如下
Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim m As String

m = Target.Value

Range(m).Interior.ColorIndex = 4 '我想让所在单元格里填写的数据读出来,作为我要染色的目标地址,应该怎么改。。


End Sub

--------------------编程问答-------------------- 今天又有新的问题了。。就是
VBA选中一列报错。。显示type mismatch

Sub Worksheet_SelectionChange(ByVal Target As Range)
我用的是这个开头,选中单元格没报错,但是选中整一行或者整一列就会报错。。。求指点,不胜感激 --------------------编程问答-------------------- 当然会出错了,你用的SelectionChange事件在选择范围变化时触发。那个类型为Range的Target就是选择的内容,你要针对性的使用这个Target,你想使用的是一个Cell,如Target.Cells(1,1)表示选择范围内第一行第一列。
补充:VB ,  VBA
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,