すぐに役立つエクセルVBAマクロ集 - FAQ 数式で求めた答を別のセルにも表示させる

　　すぐに役立つエクセルVBAマクロ集すぐマク

Excel VBA Macro
FAQ

500連発・組み方講座フォロー

Big Color Pallet

[広告]

Excel VBA Macro

Excel DownLoad

Excel VBA Macro　・　フロー制御等　・　FAQ

数式で求めた答を別のセルにも表示させるには？

Question 78.9

Excel VBA Borad （掲示板）より

VBA初心者です。 VBAを使ってユーザー定義の関数を作りたいので、教えてください！
例えば、A1セルに「5+8*10」と計算式を書き込み、それをB1セルで「85」と計算結果を表示させたいのです。
質問コーナーにあったのとはちょっと違います。本当に困っています。よろしくお願いします。

Answer　　

2005.1.14　もてもて

シートモジュールのChangeイベントで

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        Range(Target.Address).Offset(, 1).Formula = "=" & Target.Value
    End If
End Sub

ありがとうございました

すぐに返事をいただいていたのに済みませんでした。さっきやってみたら動きました。
なんで動かなかったのかは、保存していなかったので今となっては不明ですが、無事動いたのでいいことにします。
ありがとうございました。