[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『VBAで計算式で絶対参照を使えてるかどうかの正解判定』(B)
Excelの研修資料を作っています。
計算式を入れる問題で、正しく入力できているかの判定できるものをVBAで作ったのですが、
セルが絶対参照で入力できているかどうかの判定ができません。
例えば、金額×個数の計算式を入力する表を作る問題だったとして、
金額は固定なので絶対参照でセルを入力して欲しい場合です。
< 使用 Excel:Excel2016、使用 OS:Windows10 >
(通りすがり) 2023/03/14(火) 10:34:10
(AAA) 2023/03/14(火) 11:41:11
>正しく入力できているかの判定できるものをVBAで作ったのですが、
どんな感じの物ですか? (興味本位) 2023/03/15(水) 08:19:35
Sub sample() Dim targetCell As Range, aCell As Range Set targetCell = ActiveCell For Each aCell In targetCell.Precedents Select Case True Case targetCell.Formula Like "*" & aCell.Address(True, True) & "*": Debug.Print aCell.Address(True, True); vbTab; "行絶対 列絶対" Case targetCell.Formula Like "*" & aCell.Address(True, False) & "*": Debug.Print aCell.Address(True, False); vbTab; "行絶対 列相対" Case targetCell.Formula Like "*" & aCell.Address(False, True) & "*": Debug.Print aCell.Address(False, True); vbTab; "行相対 列絶対" Case targetCell.Formula Like "*" & aCell.Address(fasle, False) & "*": Debug.Print aCell.Address(False, False); vbTab; "行相対 列相対" End Select Next End Sub (´・ω・`) 2023/03/15(水) 10:30:00
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.