电商平台系统搭建的关键要素与现代技术应用探讨
1245
2023-02-12
本文目录一览:
参考公式:=IF(A2="00100101","[旧街场]3合1原味白咖啡",IF(A2="00100102","[旧街场]3合1赤砂糖白咖啡",IF(A2="00100103","[旧街场]3合1果味白咖啡",IF(A2="00100104","[旧街场]2合1白咖啡(附赠糖条)",IF(A2=100105,"[旧街场]3合1白奶茶","")))))
如果那些商品全名已经存在工作表excel表单直接写代码了excel表单直接写代码,那么编辑公式excel表单直接写代码的时候就不用自己输入全名了excel表单直接写代码,直接用鼠标选中引用就可以了,或用LOOKUP函数
这个先要建立一个对应数据表格,假设在SHEET1工作表的A列写入代码,B列写入对应的内容。
则在SHEET2工作表中的A2单元格只要写入代码,B2单元格写入公式=VLOOKUP(A2,SHEET1!A:B,2,)
回车,就能得出要的内容了。
如果A列还有其他的条件码要转换,只要下拉复制公式就行了。
如果只想保留这个B列的内容----选中B列----右键-----复制-----再右键-----选择性粘贴----数值---确定后再删去A列----这样新的A列就是要的内容了。
再上图看一下。
如SHEET1建立数据对应关系。
在SHEET2的B2单元格写入公式。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count 1 Then Exit Sub
If Target.Column() = 2 And Target.Row 12 And Target.Row < 18 Then
If Len(Target) < 2 Then Exit Sub
Application.EnableEvents = False
r = --Left(Target, 1)
t = Right(Target, 1)
Select Case t
Case "R"
c = 1
Case "X"
c = 2
Case "Z"
c = 3
Case "Q"
c = 4
Case "D"
c = 5
End Select
Target = [b2:f5].Cells(r, c)
Application.EnableEvents = True
End If
End Sub
版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。