热门标签 | HotTags
当前位置:  开发笔记 > 编程语言 > 正文

Excel读取某一列的宏代码VBA代码源码及解说(详尽版)

背景业务需要依据详细设计文档编写所有对应的页面问题工作量大,11张大表(几十上百字段)时间紧3天完成核心有完整的表设计,可通过excel手动编辑完成。新问题普通字段没问题,可增加了字典后

背景

业务需要依据详细设计文档编写所有对应的页面


问题

工作量大,11张大表(几十上百字段)时间紧 3天完成


核心

有完整的表设计,可通过excel手动编辑完成。


新问题

普通字段没问题,可增加了字典后工作量骤然提升,这种特殊性让工作的难度和体量都给手工操作Excel带来了挑战


解决方案

通过代码实现手工操作excel的工作,也就是编写VBA宏

Sub detailPage()'
' 沫沫金
' 生成居民健康档案浏览器页面,时间: 2017/08/17
'
Dim tri As Integer, td, tableName, nameC, valC, dicC, saveC As String
'
'配置区域:Config
'
'三列一行控制器记录仪
tri = 1
'表名列
tableName = LCase(Cells(1, "D"))
'label列
nameC = "A"
'值列
valC = "B"
'字典列
dicC = "C"
'存储列
saveC = "F"

For n = 1 To [A65536].End(xlUp).Row
    '初始行内容
    td = ""
    '三列一行
    If tri = 1 Then td = ""
    '字段说明
    td = td + "

" + Cells(n, nameC)
    '字典字段特殊处理
    If Cells(n, dicC) = "" Then
    td = td + "

${sessionScope.data." + tableName + "[index]." + LCase(Cells(n, valC)) + "}

"
    Else
    td = td + "

"
    End If
    '三列一行结束处理
    If tri = 3 Then td = td + ""
    '拼接一行,扔到空闲列统一拷贝
    Cells(n, saveC) = td
    '当前列记录
    tri = tri + 1
    '三列一行控制器
    If tri > 3 Then tri = 1
Next n

MsgBox "恭喜你,详细信息生成成功。"
'
End Sub

启用宏,拷贝到代码区运行即可看到拼接结果。完全自定义拼接格式,百分百解放双手的工具。


下面,给java开发同伴重点说明下

if判断 条件不用圆括号
条件判断等于一个等号
格式排版必须控制好
没有分号


以上,运行说明,在当前的sheet页Alt+F8运行上面的宏。生成完成会收到友情提醒,好了,愉快的VBA结束。


by.沫沫金

于2017-08-17 西安


推荐阅读
  • Maven + Spring + MyBatis + MySQL 环境搭建与实例解析
    本文详细介绍如何使用MySQL数据库进行环境搭建,包括创建数据库表并插入示例数据。随后,逐步指导如何配置Maven项目,整合Spring框架与MyBatis,实现高效的数据访问。 ... [详细]
  • 本文详细介绍了 `org.apache.tinkerpop.gremlin.structure.VertexProperty` 类中的 `key()` 方法,并提供了多个实际应用的代码示例。通过这些示例,读者可以更好地理解该方法在图数据库操作中的具体用途。 ... [详细]
  • 本文探讨了在UIScrollView上嵌入Webview时遇到的一个常见问题:点击图片放大并返回后,Webview无法立即滑动。我们将分析问题原因,并提供有效的解决方案。 ... [详细]
  • 题目描述:Balala Power! 时间限制:4000/2000 MS (Java/Other) 内存限制:131072/131072 K (Java/Other)。题目背景及问题描述详见正文。 ... [详细]
  • 本文基于Java官方文档进行了适当修改,旨在介绍如何实现一个能够同时处理多个客户端请求的服务端程序。在前文中,我们探讨了单客户端访问的服务端实现,而本篇将深入讲解多客户端环境下的服务端设计与实现。 ... [详细]
  • 本文详细介绍了如何使用C#实现不同类型的系统服务账户(如Windows服务、计划任务和IIS应用池)的密码重置方法。 ... [详细]
  • Spring Security基础配置详解
    本文详细介绍了Spring Security的基础配置方法,包括如何搭建Maven多模块工程以及具体的安全配置步骤,帮助开发者更好地理解和应用这一强大的安全框架。 ... [详细]
  • Hibernate全自动全映射ORM框架,旨在消除sql,是一个持久层的ORM框架1)、基础概念DAO(DataAccessorOb ... [详细]
  • Fiddler 安装与配置指南
    本文详细介绍了Fiddler的安装步骤及配置方法,旨在帮助用户顺利抓取用户Token。文章还涵盖了一些常见问题的解决方案,以确保安装过程顺利。 ... [详细]
  • td{border:1pxsolid#808080;}参考:和FMX相关的类(表)TFmxObjectIFreeNotification ... [详细]
  • Beetl是一款先进的Java模板引擎,以其丰富的功能、直观的语法、卓越的性能和易于维护的特点著称。它不仅适用于高响应需求的大型网站,也适合功能复杂的CMS管理系统,提供了一种全新的模板开发体验。 ... [详细]
  • spring boot使用jetty无法启动 ... [详细]
  • Java多线程售票案例分析
    本文通过一个售票系统的实例,深入探讨了Java中的多线程技术及其在资源共享和并发控制中的应用。售票过程涉及查询、收款、找零和出票等多个步骤,其中对总票数的管理尤为关键。 ... [详细]
  • 本文详细介绍了在单片机编程中常用的几个C库函数,包括printf、memset、memcpy、strcpy和atoi,并提供了具体的使用示例和注意事项。 ... [详细]
  • 本文介绍了如何在GTK+2中实现透明背景下的小部件叠加绘制,类似于GTK3中的GtkOverlay功能。 ... [详细]
author-avatar
隆威SU_486
这个家伙很懒,什么也没留下!
PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | 在线工具
Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved | 京公网安备 11010802041100号 | 京ICP备19059560号-4 | PHP1.CN 第一PHP社区 版权所有