excel如何在一个单元格中自动编号?比如:NO:00000001.打印下一次单时变成NO:00000002. excel如何在一个单元格中自动编号?比如:NO:00000...

\u53ef\u4ee5\u901a\u8fc7\u5b8f\u6765\u5b9e\u73b0\u3002 \u5728\u6253\u5370\u4e8b\u4ef6\u91cc\u89e6\u53d1\u5b8f\uff0c\u901a\u8fc7\u5b8f\u6765\u81ea\u52a8\u5199\u5355\u5143\u683c\u7684\u5185\u5bb9\u3002\u6211\u4eec\u5c31\u662f\u8fd9\u4e48\u505a\u7684\u3002

\u53ef\u4ee5\u7ecf\u8fc7\u5b8f\u6765\u5b8c\u6210\u3002\u5728\u6253\u5370\u4e8b\u60c5\u91cc\u89e6\u53d1\u5b8f\uff0c\u7ecf\u8fc7\u5b8f\u6765\u81ea\u52a8\u5199\u5355\u5143\u683c\u7684\u5f62\u5f0f\u3002\u6211\u4eec\u5c31\u662f\u8fd9\u4e48\u505a\u7684\u3002\u5047\u8bbe\u4e0d\u4f1a\u7684\u8bdd\uff0c\u53ef\u4ee5\u548c\u6211\u8054\u7cfb2011-10-24 10:05:05

\u5728\u5355\u5143\u683c\u5de6\u4e0b\u89d2\u62d6\u62fd\u83dc\u5355\u91cc\u9009\u5c31\u884c\u4e86

假设这个需自动编号的单元格在sheet1中的A1单元格,先右键点击A1单元格,依次点"设置单元格格式"→"自定义",在类型下面的输入框,输入00000000,这个编号需要多为位就输入多少个0,然后点击确定。
然后按alt+f11打开VBA编辑器,双击窗口左边工程窗口中的ThisWorkbook,在弹出的代码编辑区粘贴如下代码:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.Range("A1") = Sheet1.Range("A1") + 1
End Sub
保存后关闭VBA编辑器。
在第一次打印之前将A1单元格的数值改为0.
OK
说明:由于这个代码不能区分打印预览和打印,需要在写代码之前预览好设置好打印格式,以后使用不能再预览,否则,如果再预览后再打印的话,编号会在一次打印时加2。

如图,对A1,设置单元格格式"№"00000000

插入一个矩形(其它也行),输入文字(自己定,本人输入“增号”)

在矩形上右击,指定宏,输入宏名如kk,"新建”。

将下列代码加入即可。

Sub kk()
[a1] = [a1] + 1
End Sub

这样点矩形即增加数字。其实为了防止误操作,还可参照做一个减号。

供您参考。祝您一切顺利



第一行输入初始编号,鼠标点击第一个单元格,变为黑粗十字后,下拉到需要的单元格,选择序列填充,(07是自动的,不用选择序列。)

  • 濡備綍鍦‥XCEL涓鍚屾椂鍔犲叆涓涓瀛楀拰鏁板瓧?
    绛旓細鍦EXCEL閲缁熶竴鍔犱竴涓枃瀛楃殑鏂规硶锛1銆侀鍏堬紝鎴戜滑鎵撳紑闇瑕佷慨鏀圭殑Excel琛ㄦ牸锛屾瘮濡傛垜浠鍦ㄤ骇鍝佸瀷鍙疯繖涓鏍忕殑鍓嶉潰锛屾墍鏈夐兘鍔犱笂鈥淚OS鈥濄2銆佹垜浠彲浠ラ変腑鍏朵腑绗涓涓崟鍏冩牸锛岀劧鍚庡湪鍚庨潰绌虹櫧鐨勫崟鍏冩牸鍐呰緭鍏ュ叕寮="ISO"&B3锛岀劧鍚庡洖杞︺3銆佹鏃舵垜浠彂鐜帮紝璇ュ崟鍏冩牸浼氭樉绀轰骇鍝佸瀷鍙峰凡缁忓姞涓婁簡ISO銆4銆佺劧鍚庡皢榧犳爣绉诲姩鍒...
  • excel涓涓崟鍏冩牸涓鏃㈡湁鏂囧瓧鍙堟湁鏁板瓧,鎬庝箞瀵规暟瀛楄缃櫨鍒嗘瘮鏍煎紡,鍙湁涓...
    绛旓細2銆佸垪濂芥暟鎹悗锛岄夋嫨鏁版嵁鏃佺殑涓涓崟鍏冩牸锛屾寜Ctrl+1璋冨嚭鍗曞厓鏍艰缃〉闈3銆佽繘鍏ュ崟鍏冩牸璁剧疆椤甸潰锛岀偣鍑昏嚜瀹氫箟锛岀劧鍚庤嚜瀹氫箟鏍煎紡涓"鏌愭煇鍏徃鍒╂鼎澧為暱"0.00%銆4銆佽嚜瀹氫箟鏍煎紡涔嬪悗锛岃緭鍏ュ叕寮=C2銆4銆佽緭鍏ュ叕寮忓悗鍥炶溅灏卞彲浠ュ緱鍒版湁鏂囧瓧鍙堟湁鐧惧垎姣斾簡銆5銆佹垨鑰呬篃鍙互鐩存帴鍦ㄨ缃ソ鏍煎紡鐨鍗曞厓鏍间腑锛岀洿鎺ヨ緭鍏ユ暟瀛椾篃...
  • 濡備綍excel涓湪鏌鍗曞厓鏍间腑杈撳叆鍐呭,鍙涓鍗曞厓鏍艰嚜鍔ㄥ~鍏ュ搴旂殑淇℃伅_鐧 ...
    绛旓細鍙互浣跨敤Vlookup鍑芥暟閫氳繃鏌ユ壘鐩稿簲鐨勫叧閿瓧锛堣緭鍏ョ殑鍐呭锛夎繘琛屽尮閰嶆煡鎵惧苟杩斿洖鐩稿搴旂殑缁撴灉锛屼絾鏄簨鍏堥渶瑕佹湁涓浠藉鐓ц〃銆俈LOOKUP鍑芥暟鐢ㄩ旓細鍦琛ㄦ牸鎴栨暟鍊兼暟缁勭殑棣栧垪鏌ユ壘鎸囧畾鐨勬暟鍊硷紝骞剁敱姝よ繑鍥炶〃鏍兼垨鏁扮粍褰撳墠琛屼腑鎸囧畾鍒楀鐨勬暟鍊笺傚綋姣旇緝鍊间綅浜庢暟鎹〃棣栧垪鏃讹紝鍙互浣跨敤鍑芥暟VLOOKUP 浠f浛鍑芥暟HLOOKUP銆傝娉曪細VLOOKUP(...
  • excel涓浣璁涓涓崟鍏冩牸鑷姩绛変簬鍓嶅嚑涓崟鍏冩牸鐩稿姞
    绛旓細1銆侀鍏堝彲浠ラ氳繃姹傚拰鍑芥暟锛=sum锛圓2锛欵2锛夛紝瀵硅繛缁浉閭荤殑鍗曞厓鏍锛堟垨鍖哄煙锛夋瘮杈冩柟渚垮拰绠娲 2銆佸彟澶栵紝杩樺彲浠ラ氳繃鏈绠鍗曠殑鍗曞厓涓浉鍔犳潵瀹炵幇锛屾瘮濡=A3+C3+E3锛屽涓嶈繛缁殑鍗曞厓涓浉瀵规柟渚垮啓
  • excel涓浣曞湪涓涓崟鍏冩牸鍐呮妸涓や釜瀛楃鑷姩鍙樹负涓変釜瀛楃
    绛旓細鐢ㄥ叕寮 =IF(LEN(A1)=2,LEFT(A1,1) & " " & RIGHT(A1,1),A1)瑙i噴锛氾紳濡傛灉A1鐨勫瓧绗︽暟锛2锛岄偅涔堬紝A1绗涓涓瀛楃锛岃繛鎺ヤ袱涓┖鏍硷紝杩炴帴A1鏈鍚庝竴涓瓧绗︺
  • 濡備綍鐢ㄥ畯璁捐Excel鍏朵腑涓涓崟鍏冩牸鍦ㄦ墦鍗颁腑鑷姩+1浣撶幇?
    绛旓細6銆佺‘瀹氬叕寮忓悗锛屽皬鏄庣殑骞撮緞灏卞嚭鏉ヤ簡銆7銆侀夋嫨12鐨勫崟鍏冩牸锛屼笅鎷夊鍒跺叕寮忓氨鍙互浜嗐濡備綍鍦褰撴煇涓崟鍏冩牸婊¤冻鏉′欢,鍙栧彟澶涓涓崟鍏冩牸鐨勬暟鍊 --鍙互if鍒ゆ柇锛屾ゼ涓婃槸瀵圭殑 濡備綍鐢excel琛ㄦ牸瀹炵幇涓嬪垪鍔熻兘锛氬湪鏌愪竴鍗曞厓鏍间腑杈撳叆鐗瑰畾鍊硷紝鍦ㄥ彟涓涓崟鍏冩牸涔熶細鑷姩杈撳叆鐗瑰畾鐨勫笺傚彲浠ュ湪A2杈撳叆锛=IF(A1="鏈","...
  • 濡備綍鍦‥XCEL閲鑷姩閫夋嫨骞舵眹鎬荤壒瀹氭暟鎹嚦涓涓崟鍏冩牸鍐?
    绛旓細骞舵暟鎹殑鍗曞厓鏍鍖哄煙,杩欓噷閫変腑鈥滄眹鎬烩濆伐浣滆〃涓殑B3:E6鍗曞厓鏍煎尯鍩熴3.閫夋嫨鈥滄暟鎹濊彍鍗曢夐」鍗,鍗曞嚮宸ュ叿鏍忎腑鐨勨滃悎骞惰绠椻濇寜閽1銆侀変腑Sheet1涓殑鏁版嵁鎵鍦ㄥ尯鍩熴2銆佺偣鍑汇愭彃鍏ャ戙愭暟鎹忚琛ㄣ戞墦寮銆愬垱寤烘暟鎹忚琛ㄣ戝璇濇銆3銆佸湪銆愰夋嫨鏀剧疆鏁版嵁閫忚琛ㄧ殑浣嶇疆銆戦夐」锛岃缃愮幇鏈夊伐浣滆〃銆戯紝銆愪綅缃戦夋嫨...
  • excel涓浣曞湪涓涓崟鍏冩牸鍐呮妸涓や釜瀛楃鑷姩鍙樹负涓変釜瀛楃
    绛旓細鍋囪浣犵殑濮撳悕鍒楀湪A鍒楋紙浠嶢2寮濮嬬殑)锛屾壘涓涓绌哄垪杈撳叆姣斿鏄疊鍒楀湪b2涓緭鍏 =if(len(a2)=2,left(a2,1) & " " & right(a2,1),a2)鍚戜笅濉厖
  • 濡備綍灏excel涓涓崟鍏冩牸鍐呯殑鍐呭鍒嗘媶鎴愬涓
    绛旓細閽堝excel涓涓崟鍏冩牸涓瀛樺湪澶氳鍐呭鐨勬儏鍐碉紝涓嬪垎閽堝涓嶅悓鎯呭喌杩涜鍒嗘媶锛1銆佸鏋滃崟鍏冩牸涓殑鏁版嵁瀛樺湪澶氳锛屼笖琛屼笌琛屼箣闂村瓨鍦ㄥ洖杞︾殑鍏崇郴锛屼粠缂栬緫鏍忎腑鍏ㄩ夊鍒跺悗锛岀洿鎺ョ矘璐达紝鍗冲彲绮樿创鎴愪负鍒嗚鏁版嵁銆2銆佽嫢鍗曞厓鏍间腑澶氳鏁版嵁涓嶅瓨鍦ㄢ滄崲琛屸濈殑鎯呭喌锛屾暟鎹腑澶氳鏁版嵁閮藉湪涓琛岋紝闇瑕佸厛灏嗕竴琛屾暟鎹繘琛屽鐞嗭紝鍙氳繃...
  • 濡備綍鍦╡xcel涓灏涓涓崟鍏冩牸鍐呭鍏ㄩ儴鏄剧ず鍑烘潵?
    绛旓細璇峰弬鐓т互涓嬫楠よ繘琛屾搷浣滐紝鍗冲彲鍦excel灏涓涓崟鍏冩牸鐨勫唴瀹瑰叏閮ㄦ樉绀哄嚭鏉ャ1銆侀鍏堝湪鐢佃剳涓婃墦寮涓涓EXCEL鏂囦欢锛鍦ㄥ崟鍏冩牸涓杈撳叆鏂囧瓧鍐呭锛屽彲浠ュ彂鐜癆1鍗曞厓鏍肩殑鍐呭娌℃湁鍏ㄩ儴鏄剧ず鍑烘潵銆2銆佺劧鍚庣敤榧犳爣閫変腑A1鍗曞厓鏍硷紝鐐瑰嚮涓婃柟宸ュ叿鏍忎腑鐨勨滃紑濮嬧濋夐」銆3銆佺劧鍚庡湪鍑虹幇鐨勯〉闈腑锛屾壘鍒扳滄牸寮忊濋夐」杩涜鐐瑰嚮銆4銆佺劧鍚庡湪...
  • 扩展阅读:一个单元格拆分成多行 ... 同一个单元格上下分行 ... Excel表格制作 ... 一个单元格内怎么拆分 ... 拆分单元格一行变二行 ... 一个单元格分裂成两个 ... 一个单元格上下分二层 ... 一个格子拆分成三格 ... 单元格里添加小单元格 ...

    本站交流只代表网友个人观点,与本站立场无关
    欢迎反馈与建议,请联系电邮
    2024© 车视网