Vba
  • 2024-10-06VBA日历进度
    hi,大家好!经过两次台风的洗礼之后,我们这里终于开始降温了,终于感觉到秋天的存在了!时间也在一天天的过去,马上要十一假期了,十一过了,就可以算着过年了,让今天就让我们来算算,离年底还剩余多少?(文章编辑时间为2024-09-23)那我们就来看看怎么做吧!01、创建窗体这里我们先来创建一个窗体,在窗体上
  • 2024-10-04VBA中类的解读及应用第十六讲:利用类方法和事件,让文本框在激活时改变颜色(中)
    《VBA中类的解读及应用》教程【10165646】是我推出的第五套教程,目前已经是第一版修订了。这套教程定位于最高级,是学完初级,中级后的教程。类,是非常抽象的,更具研究的价值。随着我们学习、应用VBA的深入,有必要理解这些抽象的理论知识。对象,类,过程,方法,属性,事件,接口,接口如何实现等等。掌
  • 2024-10-03【VBA】シートの見出し色を設定【.Tabl.Colorと.Tab.ColorIndexを使う】
    参考元:【VBA】シートの見出し色を設定【.Tabl.Colorと.Tab.ColorIndexを使う】https://daitaideit.com/vba-sheet-tab-color/シートの見出しの色を設定する「.Tab.Color」でシート色を設定SubTEST1()'シート見出しの色を設定Sheets("Sheet1").Tab.Color=RG
  • 2024-10-03【VBA】シート名の一覧を取得【シートをループしてNameを使う】
    参考元:【VBA】シート名の一覧を取得【シートをループしてNameを使う】https://daitaideit.com/vba-sheet-get-list/シート名の一覧を取得SubTEST1()'シート一覧を取得Fori=1ToSheets.CountDebug.PrintSheets(i).NameNextEndSub「ForEach
  • 2024-10-03【VBA】シート数を取得する【Sheets.Countで取得できます】
    参考元:【VBA】シート数を取得する【Sheets.Countで取得できます】https://daitaideit.com/vba-sheet-count/「Sheets.Count」でシート数を取得SubTEST1()'シート数を取得Debug.PrintSheets.CountEndSubシート数を取得する場面シート数を取得できれば、次
  • 2024-10-03【VBA】シート名を検索する【完全一致と部分一致の検索ができます】
    参考元:【VBA】シート名を検索する【完全一致と部分一致の検索ができます】https://daitaideit.com/vba-sheet-search-name/シート名が一致したらシート名を色付け「Sheet2」を検索して、一致したシートを色付けするという感じです。SubTEST3()Fori=1ToShee
  • 2024-10-03【VBA】シートを並び替える【バブルソートを使ってMoveで移動する】
    参考元:【VBA】シートを並び替える【バブルソートを使ってMoveで移動する】https://daitaideit.com/vba-sheet-sort/手順としては、次のようになります。基準のシートを「1~4番目」でループ比較シートを「基準+1番目~最終シート」でループ右側のシートが小さい場合は、
  • 2024-10-03【VBA】シートコピーの繰り返しで同じシートを複数作成【Copyをループする】
    【VBA】シートコピーの繰り返しで同じシートを複数作成【Copyをループする】シート名をリストから取得して同じシートを複数作成元シートとリストを作成しておくリストを作成しておきます。シート名をリストから取得して同じシートを複数作成SubTEST3()
  • 2024-10-02【VBA】シートの追加方法まとめ【名前変更、先頭や最後、複数シートの追加をする】
    参考元:【VBA】シートの追加方法まとめ【名前変更、先頭や最後、複数シートの追加をする】https://daitaideit.com/vba-sheet-add/アクティブシートの左側に追加SubTEST1()'アクティブシートの左側に追加Sheets.Addbefore:=ActiveSheetEndSub左側に追加したい
  • 2024-10-02【VBA】シートの削除方法まとめ【強制的に削除する、条件を指定する】
    参考元:【VBA】シートの削除方法まとめ【強制的に削除する、条件を指定する】https://daitaideit.com/vba-sheet-delete/SubTEST2()Application.DisplayAlerts=False'メッセージを非表示ActiveSheet.Delete'シートを削除Application.DisplayAlerts=True'メ
  • 2024-10-02【VBA】シートの移動方法まとめ【末尾や先頭、別ブック、複数の移動をする】
    参考元:【VBA】シートの移動方法まとめ【末尾や先頭、別ブック、複数の移動をする】https://daitaideit.com/vba-sheet-move/シートを次の場所に、移動してみます。特定シートの左右先頭や末尾別ブック※使用方法はCOPYとほとんど同じ。特定シートの左に移動SubTEST
  • 2024-10-02【VBA】シートのコピー方法まとめ【コピーして名前変更、末尾や先頭、新規ブック、複数のコピーをする】
    参考元:【VBA】シートのコピー方法まとめ【コピーして名前変更、末尾や先頭、新規ブック、複数のコピーをする】https://daitaideit.com/vba-sheet-copy/シートを、特定シートの前後や、先頭、末尾にコピーするには、「before:=」と「after:=」を使って、コピー先のシートを指定
  • 2024-10-02【VBA】シート名の取得と変更をする方法【.Nameを使います】
    参考元:【VBA】シート名の取得と変更をする方法【.Nameを使います】https://daitaideit.com/vba-sheet-name/SubTEST4()'アクティブシートのシート名を変更ActiveSheet.Name="ABC"'2番目のシートのシート名を変更Sheets(2).Name="ABC"'シー
  • 2024-10-02【VBA】シートの選択方法まとめ【複数選択と解除、シートをアクティブにする】
    【VBA】シートの選択方法まとめ【複数選択と解除、シートをアクティブにする】シートを複数選択するSubTEST4()Sheets("Sheet1").Select'Sheet1を選択Sheets("Sheet2").SelectFalse'Sheet2も選択EndSub配列を使って選択SubTEST5()'Sheet1とSheet2
  • 2024-10-02【VBA】シートの指定方法4選【アクティブシート、シート名、シートインデックス、シートオブジェクト】
    参考元:大体でIT|ExcelVBAhttps://daitaideit.com/vba/#mokuzi3【VBA】シートの指定方法4選【アクティブシート、シート名、シートインデックス、シートオブジェクト】シートを指定する方法を4つご紹介します。アクティブシートを指定シート名を使うシートインデックスを
  • 2024-10-01【VBA】可視セルや空白セルの位置を取得【SpecialCellsを使う】
    参考元:【VBA】可視セルや空白セルの位置を取得【SpecialCellsを使う】https://daitaideit.com/vba-specialcells/SpecialCellsの使い方'コメントCells.SpecialCells(xlCellTypeComments).Select'定数Cells.SpecialCells(xlCellTypeConstants).Select'すべてCells.Special
  • 2024-10-01【VBA】表全体の範囲を取得する【CurrentRegionが便利です】
    参考元:【VBA】表全体の範囲を取得する【CurrentRegionが便利です】https://daitaideit.com/vba-currentregion/ポイントとなるVBAコード'CurrentRegionでセル範囲を取得WithRange("A1").CurrentRegion.Select'表の範囲を選択.Rows(1).Select'表の1行目を選択
  • 2024-10-01【VBA】UsedRangeの範囲から最終行など取得【UsedRange.Rows.Countなど】
    参考元:【VBA】UsedRangeの範囲から最終行など取得【UsedRange.Rows.Countなど】https://daitaideit.com/vba-usedrange/ポイントとなるVBAコードWithActiveSheet.UsedRange.Select'使用しているセル範囲'行.Rows(1).Select'1行目.Rows(.Rows.C
  • 2024-10-01【VBA】セル範囲をセルに代入するときの注意点【RangeにValueをつける】
    参考元:【VBA】セル範囲をセルに代入するときの注意点【RangeにValueをつける】https://daitaideit.com/vba-range-value/ポイントとなるVBAコード'セル範囲を値として別セルに代入Range("E1:G3").Value=Range("A1:C3").Value'OKRange("E1:G3")=Range("A1:C3")'ダメ
  • 2024-10-01Excel:vba编程中出现下标越界错误
    出现错误的原因有以下可能:(新手小白学习ing,记录学习,可能还有别的错误原因)1.表名出错,所以找不到目标表,更找不到具体范围(大小写也一定要一样)2.范围出错,比如下面的D2:D6,要确定是否存在这一列(注意vba里面的符号都是英文的)在Excel中,工作簿是一个小册子,工作表是小册子中的某一
  • 2024-10-01【VBA】RangeやCellsの範囲を移動する【Offsetを使います】
    参考元:【VBA】RangeやCellsの範囲を移動する【Offsetを使います】https://daitaideit.com/vba-range-offset/ポイントとなるVBAコードCells(1,1).Offset(2,3).Select'Cellsを2行と3列だけ移動するRange("A1").Offset(2,3).Select'Rangeをを2行と3列だけ移動するVBA
  • 2024-09-30VBA代码解决方案第十八讲:激活一个EXCEL工作簿后,遍历工作表的方法一
    《VBA代码解决方案》(版权10028096)这套教程是我最早推出的教程,目前已经是第三版修订了。这套教程定位于入门后的提高,在学习这套教程过程中,侧重点是要理解及掌握我的“积木编程”思想。要灵活运用教程中的实例像搭积木一样把自己喜欢的代码摆好。这套教程共三册,一百四十七讲,内容覆
  • 2024-09-29【VBA】シートをクリアする
    参照元:【VBA】シートをクリアする【値のみや、初期化、範囲指定、2行目以降をクリアする】https://daitaideit.com/vba-sheet-clear/シートをクリアする1.値のみをクリア(.ClearContents)SubTEST1()'値のみをクリアCells.ClearContentsEndSub2.シートを
  • 2024-09-28WINCCV7.5SP2VBA编程8-通过事件执行脚本
    这一篇在新浪博客发表过,审核周期有点长,为了避免丢失,这里再记录一遍。有三种途径执行Wincc画面设计器的VBA脚本:事件、用户自定义菜单和工具栏、VBA编辑器。前面的学习是通过VBA编辑器执行的VBA程序,现在通过事件来练习VBA程序执行。还是在前面WINCC项目程序来做练习。打开项目编
  • 2024-09-28Wincc7.5sp2使用VBA6-全局模板、项目模板和页面模板
    这一篇博客在新浪发表过,那边还在审核,为了避免关闭服务,在这里再次发一遍。那边的博客发表后审核期间,如果想修改是不允许的,审核时间比较长,有点不合理。前面的VBA练习,都是针对具体的项目的具体画面进行编程,在wincc项目还可以全局VBA编程和具体项目VBA编程。我边看技术文档边做练习,