エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
エクセルVBA 全ての組み合わせを作る
関数だと速いのかなあ なんて思いから ちょっとやってみました Sub 並べるXL2003() Dim n As Long Dim n... 関数だと速いのかなあ なんて思いから ちょっとやってみました Sub 並べるXL2003() Dim n As Long Dim n2 As Long Dim n3 As Long Dim n4 As Long Range("D1").Formula = "=IF(A2="""","""",COUNTA(A:A)-1)" Range("E1").Formula = "=IF(B2="""","""",COUNTA(B:B)-1)" Range("F1").Formula = "=IF(C2="""","""",COUNTA(C:C)-1)" Range("G1").Formula = "=PRODUCT(E1,F1)" Range("H1").Formula = "=PRODUCT(D1:F1)" If Range("H1") > 65535 * 4 Then Exit Sub n = W