FC2ブログ
エホバの証人二世の、個人研究&趣味blogです。
2019/02«│ 2019/03| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 »2019/04
文字色の変化のON/OFFが出来ます。文字サイズ文字サイズ:大文字サイズ:中文字サイズ:小
22:53:44
今まで式入力は毎回手入力していたのですが、時間がかかる&間違えてしまうこともあるので、マクロで自動作成しようかと思っています。リボンで作れれば最高ですよね!
リボンでできると楽だし時間もかからないんですよ。フォームだと、フォームを開く、押すボタンを探すと言う時間が有るので面倒臭いですよね~~~。みんなよくそんな事出来るな~と思って見ています。

Dim buf As Variant
Dim buf2 As Variant
Sub 選択セルをクリアする()
Set buf = Nothing
Set buf2 = Nothing
End Sub
Sub 住所入力()
On Error Resume Next
If buf.Address = "" Then
Set buf = Application.InputBox("名前セルを設定して下さい", Type:=8)
End If
If buf2.Address = "" Then
Set buf2 = Application.InputBox("名前セルMATCHを設定して下さい", Type:=8)
End If
On Error GoTo 0
ActiveCell.Formula = "+if(" & buf.Address & "=" & """" & """" & "," & """" & """" & ",indirect(address(" & buf2.Address & ",6,,," & """" & "住所データ" & """" & ")))"
End Sub


こんなのがあったらすごく楽なんですよ。
ちなみに、これがあるだけで仕事の速さも正確さも上がりますよ。もっともっと頑張ろうb 今年の目標が増えました。

コメント
コメントの投稿










トラックバック
トラックバックURL
→http://ayukt0526.blog.fc2.com/tb.php/518-96712b46
この記事にトラックバックする(FC2ブログユーザー)
プロフィール

はなかな

Author:はなかな
FC2ブログへようこそ!

最新記事
最新コメント
月別アーカイブ
カテゴリ
フリーエリア
ランキング参加しています。 にほんブログ村 哲学・思想ブログ エホバの証人へ にほんブログ村 にほんブログ村 本ブログ 読書日記へ にほんブログ村 にほんブログ村 音楽ブログへ にほんブログ村
音楽(J-POP) ブログランキングへ
小説(読書感想) ブログランキングへ
キリスト教 ブログランキングへ
ブログランキング ブログ王ランキングに参加中!
検索フォーム
RSSリンクの表示
リンク
このブログをリンクに追加する
ブロとも申請フォーム

この人とブロともになる

QRコード
QR
FC2アフィリエイト