我有公式不知道怎么编.求高手帮我解决一下.
十位1234.个位3647
要把个位和十位组合起来.在表里可以自动组合
组成的数据,13,16,14,17,
23,26,24,27,
33,36,34,37,
43,46,44,47,
输个位和十位在表里自动组合公式
请个高手我编个公式
谢谢了
我有公式不知道怎么编.求高手帮我解决一下.
十位1234.个位3647
要把个位和十位组合起来.在表里可以自动组合
组成的数据,13,16,14,17,
23,26,24,27,
33,36,34,37,
43,46,44,47,
输个位和十位在表里自动组合公式
请个高手我编个公式
谢谢了
将个位数字横排,十位数字竖排,如图:
将公式
=IF($A2="","",IF(B$1="","",$A2*10+B$1))
复制后粘贴到“B2”单元格,对准右下角,光标成“+”状时双击,如图:
对准“B5”单元格右下角向右拖,如图:
'公式是不可能的
'用VBA代码实现!
'按alt+f11进入VBE编辑窗口,然后选择插入----模块----会打开一个模 '块窗口,把下面的代码复制进去--保存,再次按alt+f11返回excel窗口 '按alt+f8打开运行宏窗口,会看到test宏,运行它就可以了! '(代码亲测,希望对你有用)
'-------------以下代码部分,可全部复制我的答案到模块窗口---------------
Option Explicit
Sub test() Dim a(1 To 4) As Integer, b(1 To 4) As Integer Dim i As Integer, j As Integer Dim tem(1 To 4, 1 To 4) As Integer a(1) = 1: a(2) = 2: a(3) = 3: a(4) = 4 b(1) = 3: b(2) = 6: b(3) = 4: b(4) = 7 For i = 1 To 4 For j = 1 To 4 tem(i, j) = Val(a(i) & b(j)) Next j Next i ActiveSheet.Range("b2").Resize(4, 4) = tem End Sub