toagit

Option Explicit

Const msoFileDialogFolderPicker = 4
Const EXTENSION = ".xlsx"

Call MargeSheet

'Excelファイルマージ
Sub MargeSheet()
  Dim scriptPath

toagit

Option Explicit
Dim max
Dim min
'===============================================================================
':: 最大(max)・最小(min)のパスワード長を設定してください
max = 10
min = 3

'===============================================================================
':: ここから下はいぢらないでください

toagit

Option Explicit

'/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
'指定したエクセルファイルの全てのシートのセルをA1セルへ移動するスクリプト
'エクセルの指定はダイアログ、D&Dをサポート
'/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

Call ActivateA1

Private Sub ActivateA1()

toagit

/**
 * mainメソッド実装クラスをテストする基底クラス。
 */ 
public abstract class AbstractMainTester {
  private static final String ARGS_DELIMITER = " ";
  protected static final String LINE_SEPARATOR = System.getProperty("line.separator");
  private static final PrintStream stdOut = System.out;
  private static final PrintStream stdErr = System.err;
  private static final SecurityManager securityManager = System.getSecurityManager();
  

toagit

Public Sub CopyActiveBookPath()
    Dim path As String
    path = ActiveWorkbook.FullName
    With CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
        .SetText path
        .PutInClipboard
    End With
End Sub

toagit

@echo off
pushd %0\..
setlocal enabledelayedexpansion

set "TARGET_FOLDER=D:\xxxx"
for /f "tokens=*" %%a in ('dir %TARGET_FOLDER% /b /a:d') do (
    set SHOULD_DEL=true
    for /f "tokens=1* skip=1" %%i in (include.list) do (
        if "%%a"=="%%j" (
            echo [DEBUG] -- バックアップ対象：%%j

toagit

@echo off
rem 指定時刻にシャットダウンするバッチ
rem 秒は許容誤差とし、算出しない
rem 18:00にシャットダウン

set HOUR=18
set /a H=%HOUR%-1-%TIME:~0,2%
set /a M=60-%TIME:~3,2%

echo %HOUR%時まで%H%時間%M%分

toagit

// シングルトン パターンの例
private static final MySample INSTANCE = new MySample();
private final ExampleProperties prop;
// シングルトンのコンストラクタで初期化させる
private MySample() {
    // 初期化
    prop = initProperties();
}
 
// propの読み込み

toagit

// Array => List
// 一次元次配列
List<String> listA = Arrays.asList(new String[] {"ichika","kaito","kanna","tetsurou","mio","remmon"});
ArrayList<String> aListA = new ArrayList<String>(list);

for (String str : aList) {
  System.print.out(str);
}

// 多次元配列

toagit

<?xml version="1.0" encoding="Windows-31J"?>
<project name="builSample" default="main" basedir=".">
  <property name="path.lib" location="./lib"/>
  <property name="path.out" location="./dest"/>
  <property name="path.bin" location="${path.out}/bin"/>
  <property name="path.src" location="./src"/>
  <property name="path.test" location="./srctest"/>
  <property name="path.doc" location="${path.out}/javadoc"/>
  <property name="compiler" value="JAVA_HOME\bin\javac"/>