3.N4ST分析

ナンバーズ4のストレート分析 マクロ　対話型 変数　知らなかった本当の使い方 Sub kiguu_tyusyutu()’各集計間隔での奇数、偶数出現回数集計 Dim kai As long, i As long, ii As long, r As long, t As long, x As lon... 続きをみる

2.N4ST分析

ナンバーズ4ストレート分析  Sub next_total() '次合計を表示する Dim kai As long kai = Sheets("ｽﾄﾚｰﾄﾊﾟﾀｰﾝ").Cells(2, 15) Sheets("次数字").Select Range("jj12:kt6000").ClearCont... 続きをみる

1.N4ST分析

'ナンバーズ4のストレート分析 Dim hit_m(4000, 4) As String  Dim hitx(4000, 4) As long  Dim hit(4000, 4) As long ーーーーーーーーーーーーーーーーーーーーーーーーーー Sub saikeisanoff()'再計算オフ... 続きをみる

3.ナンバーズ4パターン表作成関係エクセルマクロ（3）

記事目次　ナンバーズ4 変数　知らなかった本当の使い方  Sub kiguu間隔() '奇遇表示と奇偶間隔でアンダーバー引く  （ 16パターンの間隔） Dim i As long, k As long, gyou As long, kiguu As long Dim kiguin As Stri... 続きをみる

2.ナンバーズ4パターン表作成関係エクセルマクロ（2）

記事目次　ナンバーズ4  Sub s_b_copy()　’上の表の右端と同じデータ（box番号）を探し下端コピーする 　Dim gyou As long Sheets("欠け算並び").Select gyou = Cells(1, 2) + 1 　saikeisanon Range("b9") =... 続きをみる