88问答网
所有问题
当前搜索:
VBA语句太长换行
VBA
设定A2:F500区域为字符型,且不能输入
换行
符和“-”,且A2:A500的字...
答:
亲,这个要用多个数据有效性。首先,选中A2:F500,设置数据有效性,公式为:=AND(NOT(ISNUMBER(FIND(CHAR(10),A2))),NOT(ISNUMBER(FIND("-",A2)))然后,选中A2:A500,区域,设置数据有效性,公式改为:=AND(NOT(ISNUMBER(FIND(CHAR(10),A2))),NOT(ISNUMBER(FIND("-",A2))),LEN(A2)<5)...
二级Access中
VBA
中MsgBox是什么意思?
答:
MsgBox函数(
语句
)用于产生一个消息框,在消息框中显示消息,等待用户单击按钮,并返回一个整型值告诉用户单击了哪一个按钮。格式为:MsgBox(提示信息[,按钮类型][,标题信息])例如:MsgBox "必须输入用户名/口令", vbOKOnly, "信息提示"对应显示消息框如下 ...
怎样批量将excel中多行的数据合并为一行,并且自动
换行
?
答:
我用的是office2019有TEXTJOIN函数,不知道你用的什么版本是否有这个函数。=IFNA(IF(MATCH(A1,A:A,)=ROW(),TEXTJOIN(CHAR(10),,OFFSET(A1,,,COUNTIF(A:A,A1))),""),"")
excel,我要实现两个文本单元格的合并,且新单元格需要
换行
,如何实现?
答:
Sub temp()Application.DisplayAlerts = False For Each cel In Selection t = t & cel.Value & vbCrLf Next Selection.Merge Selection.Value = t Application.DisplayAlerts = True End Sub 看错了,以为你要合并两个单元格并保留其数据。用这个公式,并设置新单元格格式为自动
换行
就可以了:=A1&...
在EXCEL中如何用
VBA
判断单元格文本是否已自动
换行
?
答:
好像不可以.不过你可以试试,.wraptext=false 然后再.warptext=true
access
VBA
模块 编写程序 这个题怎么做
答:
do循环条件长础拜飞之读瓣嫂抱讥是如果rs.eof不等于真.也就是说rs记录集不是结尾时执行下列
语句
(rs.eof为真时结束Do循环)执行for循环 for循环结束时 txt_资料变量的结果是: txt_资料已有的值+当前记录的字段1+空格+字段2+空格+字段3+空格 之后执行rs记录集移动到下一条记录 txt_资料变量的值后...
请问这个excel
vba
哪里写的不对?
答:
if xxxx then msgbox "" 需要
换行
写 elseif ..then msgbox
excel
VBA
一次设置多列的列宽,多个赋值
答:
选中需要调整的列,在格式下拉菜单里鼠标点击自动调整列宽,同样方法可以设置自动调整行高。但如果要使表格里的内容自动
换行
,则需到单元格格式里进行设置。
EXCEL
VBA
求助:有两列数字,一列50个,一列49个。得到结果之后输出到名为...
答:
'假设是A列和B列Sub test2()Dim temp As StringFor i = 1 To 2 '1表示第一列,2表示第二列 For j = 1 To 50 '两列中取较大的行数 temp = temp & Cells(j, i) & vbTab Next temp = temp & Chr(13) & Chr(10) '13是回车 10是
换行
NextOpen "C:\111.txt" For...
word有正文后面就是表一、表二、表三,怎么用
vba
实现当表一的内容超出...
答:
这个不需要使用
vba
……你只要 设置 表格的属性 就可以了……选中表格 如图 所示 点选 格式 段落 ……(前提是 一页能够放得下哦)
棣栭〉
<涓婁竴椤
6
7
8
9
11
12
13
14
10
15
涓嬩竴椤
灏鹃〉
其他人还搜