有没办法真真正正地让数字自动加上前缀？

mengxiangzaifei

假设a列为你所输入的数值，b列为目标列，在b2单元格输入=text(a1,"k"&$a1)，然后向下填充，看看是否满足。

andreyang

用通用格式G打头的那个。  2012-4-11 08:36 上传下载附件 (20.31 KB)

输入“K”0

andreyang

选中所要更改的单元格>>设置单元格格式>>选择自定义>>用通用格式G打头的那个>>输入“K”0>>确定.

foundking

黯夜琉璃 发表于 2012-4-11 20:03
楼主的表达能力够差 理解能力够呛
如果头像是楼主本人 还真是应了一句话：
聪明面孔笨肚肠

不好好理解人家的问题，也不好好帮人家决问题，讽刺个人，挖苦个人你倒是一把好手。
我表达力我感觉已经很明确了，第一贴就上传了2个图。我的目的是在原单元格输入一个数字，自动变成带前缀的，而且，要和手工在这个单元格输入带前缀的序号是一模一样的结果是完全一样的值。
说我表达力不行，那么看看8楼fovisio为什么一下子就理解了？是人家理解力强，还是你的理解力弱？
这里要感谢，8楼fovisio给我指明了方向；13楼dengjq2000提供了结果；21楼titiantai56提供了我想要达到的结果；31楼ctp_119的方法与指导；37楼shuyee提供的别样的方法；62楼lzqmsy的代码热忱奉献；75楼smhf_6的合并方法（开扩了人思路），感谢这么多网友，感谢你们！
当然，再坏的人也是有优点的，比如黑夜玻璃在55楼的时候提供的那个函数式子，改进了一下结构，让人眼前亮了下，虽然用不到，因为表格可能要打印出来让别人看，别人要看的是带字母的序号而你的却只是数字序号。
之所以禁声，是因为我基本已经找到答案，那就是原单元格要实现输入数字自动加字母前缀，只能通过VB实现了。而如果要实现一列单元格的100个数字序号前50个（1~50）加带A的字母（变成A1~A50），后50个批量加带K的字母（自动变成K51~K100），更不是通过一般函数就能实现的，估计还要用到VB或者VB也实现不了？当然这已经比较深了，我也就不提了。

卧龙布衣

你的问题有点怪，同意forvisiode回复

天生盗窃狂

先在要输入的地方写上公式“K”&原单元格，显示为K4，再选择性粘贴啊，粘贴数值，就可以了

葛小白

我其实只想说：
1.用辅助列很简单
2.辅助列隐藏就可以了


所以你的示例中说：“可能把L列覆盖掉的。除非把辅助列设置的格外的靠后？”我不太理解。。。

foundking

葛小白 发表于 2012-4-13 16:34
我其实只想说：
1.用辅助列很简单
2.辅助列隐藏就可以了

例如下面，假如N列是辅助列，如果把它隐藏，从表头就可看出少1列，破坏了表格结构；如果不隐藏，后续把前面若干列往后面批量Copy粘贴的过程中N列可能被覆盖掉。


朋友们，不要再强调问题之外的问题怎么解决，应该怎么解决，而应该看我的问题应该怎么解决。
我再重申一下我的问题：
那就是实现原单元格输入数字自动添加字母前缀的方法。并且要和手工直接在单元格里输入字母+数字是一模一样的东东，值一样，结果一样，显示也一样。（不要再说选择性粘贴了{:soso_e134:}{:soso_e134:}，因为前边几列做好后我要群选批量贴到后面，公式也要带过来，而后续的另外的操作也不是一言两语能全部说出来的。所以，请不要再说我为什么非要这么做，而且告诫我没必要问这么一个问题的，而且警告我没必要这么做，因为别人要做什么样的工作，及工作中要做成什么样的表格有时候说出来大家也不是很理解，因为咱们来自各行各业，从事不同专业和工种，隔行如隔山，真的没必要指责别人你们行业的表格格式不该怎么做而应该怎么做。不同的行业大家凑到一起，要解决的问题是，某个操作能不能实现，实现的方法是什么。这里还是要格外的感谢8楼fovisio给我指明了方向；13楼dengjq2000提供了结果；21楼titiantai56提供了我想要达到的结果；31楼ctp_119的方法与指导；37楼shuyee提供的别样的方法；62楼lzqmsy的代码热枕奉献。）

mrbenz

foundking 发表于 2012-4-10 18:13
你说的公式不会是="K"&A2 吧……这个结果出来的值并不是真正的K4，也是显示的是K4，得到K4后，我别的地 ...

复制，粘帖数值不行吗？

ngnndkkk

楼上太多人对楼主意图不明却在笑楼主发的此贴，一味横加指责，甚至某些知名活跃人士也是一边倒地加以挖苦，叫人情何以堪！虽然此贴已快过1年了，忍不住还是跟个贴吧。楼主意图简单明了：
（1）让某单元格区域的数字快捷地变成带有某些前缀字符，从而形成真正的字符串
（2）不得借助辅助列的方法来实现
下列代码简便易行，仅供参考（前提：已对待转换数字所在单元格的格式事先自定义为如“K0”的格式）。若要拍砖，尽管拍吧：

1. Sub 粘贴成文本()
   
2.     With Selection
   
3.         .Value = .Text
   
4.     End With
   
5. End Sub
   

复制代码