excel如何使用两个单元格内的数据自动生成直线，请帮忙看一下代码。 Dim x1, y1, x2？

1、首先我们打开需要编辑的excel，在插入页面中点击“形状”选项。2、然后我们在该页面中点击线条下方的“直线”图标选项。3、之后我们在该页面中按住键盘的“shift键”并点击鼠标左键绘制即可。

Excel一键自动匹配,在线免费vlookup工具,3步完成!Excel在线免费vlookup工具,点击40步自动完成vlookup匹配,无需手写公式,免费使用!

y1, x2, y2) End With x1 = x2 y1 = y2 End If Next Next End Sub

+ Chr(13) + "2)第一行为标题,各组数据第二行一定要整齐不可有空格；", vbOKCancel + vbQuestion, "查找两列不同数据宏 -James") = vbCancel Then Exit Sub End If x1 = 1 While Cells(2, x1) = ""x1 = x1 + 1 '第一列的起列 Wend ' 确定第二列的列数 '先找到第一个系列的...

（一）VBA程序代码如下：Sub date_and()Dim x1, x2, x3, x4On Error Resume NextSet mysheet1 = ThisWorkbook.Worksheets("Sheet1") '定义工作表Sheet1Set mysheet2 = ThisWorkbook.Worksheets("Sheet2")x4 = 1 '初始值是1mysheet2.Columns("A:B") = "" '清空Sheet2上面的A、B两列Fo...

那就添加一个辅助列，从第2行开始填充输入1到64，然后在辅助列的后一列第二行输入下面的公式，下拉即可。=INDEX($A$2:$A$5,ROUNDUP((ROW()-1)/16,0))&INDEX($B$2:$B$5,ROUNDUP((MOD(ROW()-2,16)+1)/4,0))&INDEX($C$2:$C$5,MOD(ROW()-2,4)+1)当然了，这个公式里的...

如果只是找出不同，而不需要提取出来，用条件格式更方便；选中区域，条件格式--突出显示单元格规则--重复值；在出现的对话框中，选择“唯一”，设置格式，不同姓名即会显色；如果选择“重复”，则相同姓名显色。

没大弄懂你的意思，以下代码能实现你的举例 其余的建议分别举例说明，图片中的描述，真的很难理解 Sub main()Set dica = CreateObject("scripting.dictionary")Set dicb = CreateObject("scripting.dictionary")dica(Cells(1, "L").Value & "|" & Cells(1, "M").Value & "|" & Cells(1, ...

1.选中三列，点复制，然后，打开剪贴板 2.在第四列第一个单元格双击，进入编辑状态，然后单击编辑栏，再单击剪贴板刚才复制的数据，回车。这样，三列的数据就都复制到这个单元格中。3.按CTRL+H，在弹出的对话框中，查找那位置输入空格，在替换的位置，按住ALT输入10，ALT+10代表的意思是回车，也就...

第8行 'sheet2改成你工作表图1工作的名称（名称注意有没有空格），同理a1:a30也要改 第9行 'sheet3改成你工作表中图2工作的名称（同样的注意名称有没有空格）第13行 k-3 的意思是输出的结果的来源(也是列的序号）。Sub vlookup相 () Dim i As Long Dim j As Long Di...

要用vba完成 自动判断日期， 编码，然后 单元格自己相加，每次+1 Private Sub Worksheet_Change(ByVal Target As Range)Dim tr, tc tr = Target.Row tc = Target.Column If tr = 21 And tc = 2 Then x = WorksheetFunction.Match([B21], Range("a1:a19"), 0)y = Day(Now) & "号"N...