Sub DINI3处理()
Dim i As Integer
i = 1
 Sheet2.Cells(1, i).EntireColumn.Delete          '符合条件的都删除整行
 Sheet2.Cells(2, i).EntireColumn.Delete          '符合条件的都删除整行
 Sheet2.Cells(3, i).EntireColumn.Delete          '符合条件的都删除整行
 Sheet2.Cells(4, i).EntireColumn.Delete          '符合条件的都删除整行
 Sheet2.Cells(5, i).EntireColumn.Delete          '符合条件的都删除整行
 i = 2
 Sheet2.Cells(2, i).EntireColumn.Delete          '符合条件的都删除整行
 Sheet2.Cells(3, i).EntireColumn.Delete          '符合条件的都删除整行
 Sheet2.Cells(4, i).EntireColumn.Delete         '符合条件的都删除整行
 i = 3
 Sheet2.Cells(2, i).EntireColumn.Delete         '符合条件的都删除整行
 Sheet2.Cells(3, i).EntireColumn.Delete         '符合条件的都删除整行
 i = 4
 Sheet2.Cells(2, i).EntireColumn.Delete         '符合条件的都删除整行
For i = 2 To 319

If IsNumeric(Cells(i, 1)) Then
Cells(i, 1) = "TP"
Else

Cells(i, 1) = UCase(Cells(i, 1))
End If

Next
 Sheet1.Range("a1:a319").Value = Sheet2.Range("a1:a319").Value
 Sheet1.Range("b1:b319").Value = Sheet2.Range("c1:c319").Value
 Sheet1.Range("c1:c319").Value = Sheet2.Range("b1:b319").Value

End Sub

DIDI3(数字转为TP,小写转换大写)相关推荐

  1. C语言判断字符是否为数字 如果是输出yes 如果为字母 则大写转换小写 小写转换大写

    #include <stdio.h>int main(void) {char ch;printf("input a char:");ch=getchar();//判断c ...

  2. 小写转换大写(人民币)

    小写转换大写(人民币) 实现原理: 将小写数字转换成对应的大写数字.(数字数组) 将级别插在对应的大写数字后面.(级别数组) 组合称字符串. 小写转大写规律: 0123456789    零壹贰叁肆伍 ...

  3. 8086汇编-实验6(微调)-小写转换大写

    效果如下 代码如下 assume cs:codedata segmentdb '1. one 'db '2. two 'db '3. three 'db '4. four 'db '5. five ' ...

  4. C语言-小写转换大写

    用两种算法实现,从键盘输入一个字符串,将小写字母全部转换成大写字母,然后输出 第一种: #include <stdio.h> #include <stdlib.h>int ma ...

  5. 把数字小写转换成大写,把数字转化成英文

    把数字小写转换成大写   方法一,使用系统提供的函数,但是不满足大陆财务的要求.     方法二:使用下面的函数. 英文: static str Num2EngStr(real realNum,boo ...

  6. 金额数字转换(小写转大写)

    人民币金额,小写转大写.代码如下: public String convert(String money) {String[] numberCNN = {"零","壹&q ...

  7. php大写转为小写,PHP 实现人民币小写转换成大写的方法及大小写转换函数

    php 的 PHP 实现人民币小写转换成大写的方法及大小写转换函数 下面一段代码给大家分享php实现人民币大小写转换的方法,具体代码如下所示: header("charset=utf-8;& ...

  8. html金额输入框转大写,纯CSS实现输入框字符自动转为小写或大写

    对于输入框的字符,如果要求只能输入小写或大写,怎么处理?js实现?提交到后台程序转换?其实很简单,CSS就有这个功能,一条语句就搞定. 纯CSS实现输入框字符自动转为小写或大写 CSS .lowerc ...

  9. Java黑皮书课后题第4章:*4.15(电话键盘)电话上的国际标准字母/数字映射如下所示。编写程序,提示用户输入一个小写或大写字母,然后显示对应数字。对于非字母输入,提示非法输入

    *4.15(电话键盘)电话上的国际标准字母/数字映射如下所示.编写程序,提示用户输入一个小写或大写字母,然后显示对应数字.对于非字母输入,提示非法输入 题目 题目概述 运行示例 破题 代码 题目 题目 ...

最新文章

  1. UVa-442-Matrix Chain Multiplication
  2. (C#)WinForm窗体间传值
  3. selenium根据文本匹配定位
  4. 海康设备字母编号含义 H5:0,H7:1,KT2:2,G5:3
  5. ZeroClipboard的时代或许已经过去了
  6. 月入10万和月入5千的人关键区别是什么???
  7. java base64解码出错_Java Base64解码错误及解决方法
  8. 【Android Developers Training】 58. 缓存位图
  9. 为什么计算机语言都是英语,编程为什么都是英语 编程为什么没有汉语
  10. 设计模式 之 建造者
  11. PX4从放弃到精通(一):开源飞控PX4简介+系列文章大纲
  12. ZOJ 3805 树形dp
  13. 隐藏式超远无线充电,可隔空5~10公分正常充电。
  14. 浅谈Ubuntu 18.04.1 LTS x86_64安装,美化配置及常用软件安装配置的历程
  15. TeamViewer远程控制华为设备方法
  16. 简单聊聊FPGA的一些参数
  17. Problem B Problem I
  18. node_map: Dict[str, type] = {}
  19. 三人抢答器逻辑电路图_数字电子技术实验(3三人抢答器电路设计).ppt
  20. Eucalyptus配置管理

热门文章

  1. 【中美技术专家分享实录】微服务的挑战
  2. 【论文笔记】—毫米波雷达穿雾式高分辨率成像—Supervised—HawkEye系统—2020-CVPR
  3. android特效拍照,创意随我 Android手机特效拍照软件评
  4. vue3中ref的理解
  5. 对生命常怀敬畏之心,我眼中的胡爱玲医生
  6. 广播(broadcast)的简单解析与实例运用
  7. EtherCAT主站IgH解析(一)--主站初始化、状态机与EtherCAT报文
  8. 产品经理知识体系学习与实践指南
  9. windows映射网络驱动器出错解决方案
  10. TYVJ 01034