首页 \ 问答 \ 怎么用excel VBA range 函数来表示

怎么用excel VBA range 函数来表示

怎么用excel VBA range 函数来表示 Cells(j, "J") = xlsheet.Cells(i, "E") Cells(j, "K") = xlsheet.Cells(i, "F") Cells(j, "L") = xlsheet.Cells(i, "G") Cells(j, "M") = xlsheet.Cells(i, "H") Cells(j, "N") = xlsheet.Cells(i, "I") Cells(j, "O") = xlsheet.Cells(i, "J") Cells(j, "P") = xlsheet.Cells(i, "K") Cells(j, "Q") = xlsheet.Cells(i, "L") Cells(j, "R") = xlsheet.Cells(i, "M") Cells(j, "S") = xlsheet.Cells(i, "N") 谢谢了 其他代码如下： Private Sub CommandButton1_Click() Dim xlApp As Excel.Application Dim xlbook As Excel.Workbook Dim xlsheet As Excel.Worksheet Set xlApp = New Excel.Application Set xlbook = xlApp.Workbooks.Open("D:\EXCEL\ITS电气元器件库.xlsm") xlApp.Visible = False Set xlsheet = xlbook.Worksheets("sheet1") Dim i As Integer, j As Integer, h As Integer, k As Integer, l As Integer, m As Integer, n As Integer k = 0 l = 0 m = WorksheetFunction.CountA(Workbooks("ITS电气元器件库.xlsm").Sheets("sheet1").range("d:d")) n = WorksheetFunction.CountA(range("d:d")) range("j3:s300").ClearContents For i = 3 To m For j = 3 To n If (InStr(1, Cells(j, 4), xlsheet.Cells(i, 4), vbTextCompare) > 0 Or InStr(1, Cells(j, 7), xlsheet.Cells(i, 4), vbTextCompare) > 0) And Not Cells(j, 4) = "" And Not xlsheet.Cells(i, 4) = "" Then Cells(j, "J") = xlsheet.Cells(i, "E") Cells(j, "K") = xlsheet.Cells(i, "F") Cells(j, "L") = xlsheet.Cells(i, "G") Cells(j, "M") = xlsheet.Cells(i, "H") Cells(j, "N") = xlsheet.Cells(i, "I") Cells(j, "O") = xlsheet.Cells(i, "J") Cells(j, "P") = xlsheet.Cells(i, "K") Cells(j, "Q") = xlsheet.Cells(i, "L") Cells(j, "R") = xlsheet.Cells(i, "M") Cells(j, "S") = xlsheet.Cells(i, "N") If xlsheet.Cells(i, 3) = Cells(j, 5) Then
更新时间：2023-05-31 14:05

最新回答

点击 控制中心 在右侧控制栏中找到更新 点击会跳转到更新栏，再点击更新按钮进入更新窗口，deepin会自动检测是否有可用更新。
1、只安装deepin单个linux操作系统，从deepin官网下载iso镜象，刻录光盘，或者制作 u盘启动系统盘，按提示安装即可。

2、安装windows和deepin双系统，从deepin官网下载ios镜象后，直接解压出来。按如下步骤安装即可。
a.用unetbootin装到你的硬盘上的非系统分区；
b.重启，你应该就能进入到ld的livecd模式了，执行sudo umount -l /cdrom，然后可以开始安装了，不要把livecd所在的分区挂上，否则装不上；
c.迁移你的分区，注意：如果你的多余的分区，这一步就没必要做了。

相关问答

更多

  • 求助deepin linux 无法安装[2023-04-06]

    已经将linux删除了？！ 不知道你是用什么方法删除了，是直接将linux盘格式话？！要是这样的话，就有点麻烦了！ 如果这样的话，最好的办法就是在重新安装linux系统，一般情况下会自动修复grub的。 若还没有删除linux系统的话，就用linux的引导盘去修复，网上这类的方法很多，楼主可以选择一个试试。 建议安装一个Ubuntu或者CentOs。。。 good luck to you！

  • VMWare安装deepin linux 无法开启虚拟机的Unity Mode模式，注意是deepin linux[2023-05-17]

    不论什么Linux，只要安装了VMware Tools（虚拟机／安装VMwareTools）就可以使用Unity Mode。如果是官方还没有直接支持的Linux，就需要你的Linux安装gcc和Linux kernel header，安装程序会提示你进行VMware Tools的编译，然后正确安装完毕以后，Unity Mode可以开启。

  • Deepin linux 该如何进行硬盘安装呢?[2022-02-08]

    ylmf的系统我是用硬盘安装的方法，因为人家有详细的教程。DL的系统我是用U盘量产之后安装的，也可以，细节问题参看别的关于UBUNTU的教程即可。

  • 如何在Linux下安装Linux deepin？[2022-05-09]

    当您安装系统，然后安装软件，喜欢啊，听说双系统是不是真的 但是deepin可以安装在win7，叫五笔安装，不推荐，容易出错 可以使用U盘安装，

  • 关于深度linux deepin安装软件的问题[2021-09-12]

    linux平台的软件都可以安装

  • 深度的《deepin Linux》操作系统好用吗？[2022-05-05]

    学Linux,最好用原汁原味的主流发行版，如Debian、Gentoo、Suse、Redhat系列产品等。主流发行版，除了代码质量比较高之外，因为开发时间长也比较成熟，开发团队稳定所以更新也稳定。对用户来说，用得人多的、历史比较久的发行版，遇到有问题也比较容易找到答案。

  • Linux deepin如何学习？[2022-02-26]

    不容易，如果你是用来看电影，玩游戏，说真的有些压力。 看电影软件有PPS 在线有很都要安装WIN下的客户端，不好搞。 玩游戏，还是换到WIN去吧， 办公的就可以了。

  • linux deepin系统怎么用root用户登陆？[2022-08-05]

    打开终端（即Terminal） 输入sudo -s -H 也行。注意H 一定要是大写

  • linux deepin系统和XP系统一样吗？[2022-06-21]

    不一样。xp众所周知是比尔大哥大开发的操作系统，以易操作和软件支持丰富是曾经是占统治地位的操作系统（可能要让位于windows7了），但也因安全性、稳定性差广受批评。 linux deepin 是基于linux中大名鼎鼎的ubuntu开发的，deepin原来是作盗版的，现在微软不让盗转而开发linux。linux deepin 总的来说比较强大相对ubuntu省去了不少手动配置，而且可以装免费版的永中office和集了皮肤漂的中文输入法，新手可以考虑安装。如果你不怕拆腾建议直接装 ubuntu，原汁原味的感 ...

  • DeBian Linux与Deepin Linux 有啥联系么？[2022-05-19]

    首先，必须先回答最后一个问题 Linux这个词所代表的並不是一整个像Windows这样大的桌面系统 真正的Linux是一个核心，它不包含操作跟桌面，他所包含的只有驱动、沟通、I/O等等作用 世界上现有的发行Linux版本已达五百多套以上，这还是2010年所知道的 其中有些发行版废弃了(如OpenLinux)，有些还在使用 至于Deepin Linux为何与Debian Linux相似度高 我去Deepin Linux的官网看了一下，他是承袭UBuntu Linux系统的的风格 而Ubuntu Linux本身 ...

相关文章

更多
  • 原创：用VBA实现将鼠标选择的单元格按照指定格式合并并复制到剪切板
  • 原创：如何实现在Excel通过循环语句设置指定行的格式
  • Guava学习笔记：Range
  • lucene读取word,excel,pdf
  • Guava Range类-范围处理
  • 这种的EXCEL表格 怎么来解析？？
  • JXLS根据excel模板生成EXCEL并下载
  • POI 操作 Excel的主要API
  • 原创：一个让EXCEL开口说话并且同步弹出提示框的技巧
  • 使用POI操作Excel和Word

    • 最新问答

    更多
  • 如何在Laravel 5.2中使用paginate与关系？(How to use paginate with relationships in Laravel 5.2?)
  • linux的常用命令干什么用的
  • 由于有四个新控制器，Auth刀片是否有任何变化？(Are there any changes in Auth blades due to four new controllers?)
  • 如何交换返回集中的行？(How to swap rows in a return set?)
  • 在ios 7中的UITableView部分周围绘制边界线(draw borderline around UITableView section in ios 7)
  • 使用Boost.Spirit Qi和Lex时的空白队长(Whitespace skipper when using Boost.Spirit Qi and Lex)
  • Java中的不可变类(Immutable class in Java)
  • WordPress发布查询(WordPress post query)
  • 如何在关系数据库中存储与IPv6兼容的地址(How to store IPv6-compatible address in a relational database)
  • 是否可以检查对象值的条件并返回密钥？(Is it possible to check the condition of a value of an object and JUST return the key?)
  • GEP分段错误LLVM C ++ API(GEP segmentation fault LLVM C++ API)
  • 绑定属性设置器未被调用(Bound Property Setter not getting Called)
  • linux ubuntu14.04版没有那个文件或目录
  • 如何使用JSF EL表达式在param中迭代变量(How to iterate over variable in param using JSF EL expression)
  • 是否有可能在WPF中的一个单独的进程中隔离一些控件？(Is it possible to isolate some controls in a separate process in WPF?)
  • 使用Python 2.7的MSI安装的默认安装目录是什么？(What is the default installation directory with an MSI install of Python 2.7?)
  • 寻求多次出现的表达式(Seeking for more than one occurrence of an expression)
  • ckeditor config.protectedSource不适用于editor.insertHtml上的html元素属性(ckeditor config.protectedSource dont work for html element attributes on editor.insertHtml)
  • linux只知道文件名,不知道在哪个目录,怎么找到文件所在目录
  • Actionscript：检查字符串是否包含域或子域(Actionscript: check if string contains domain or subdomain)
  • 将CouchDB与AJAX一起使用是否安全？(Is it safe to use CouchDB with AJAX?)
  • 懒惰地初始化AutoMapper(Lazily initializing AutoMapper)
  • 使用hasclass为多个div与一个按钮问题(using hasclass for multiple divs with one button Problems)
  • Windows Phone 7：检查资源是否存在(Windows Phone 7: Check If Resource Exists)
  • 无法在新线程中从FREContext调用getActivity（）？(Can't call getActivity() from FREContext in a new thread?)
  • 在Alpine上升级到postgres96（/ usr / bin / pg_dump：没有这样的文件或目录）(Upgrade to postgres96 on Alpine (/usr/bin/pg_dump: No such file or directory))
  • 如何按部门显示报告(How to display a report by Department wise)
  • Facebook墙贴在需要访问令牌密钥后无法正常工作(Facebook wall post not working after access token key required)
  • Javascript - 如何在不擦除输入的情况下更改标签的innerText(Javascript - how to change innerText of label while not wiping out the input)
  • WooCommerce / WordPress - 不显示具有特定标题的产品(WooCommerce/WordPress - Products with specific titles are not displayed)

    • Copyright ©2023 peixunduo.com All Rights Reserved.粤ICP备14003112号

    本站部分内容来源于互联网，仅供学习和参考使用，请莫用于商业用途。如有侵犯你的版权，请联系我们(neng862121861#163.com)，本站将尽快处理。谢谢合作！