Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

9769 / 13644 ﾂﾘｰ

←次へ　｜　前へ→

▼

【25555】オートフィル機能が効かない Mappo 05/6/4(土) 10:56

【25556】Re:オートフィル機能が効かない kobasan 05/6/4(土) 12:49

【25560】Re:オートフィル機能が効かない Mappo 05/6/4(土) 22:57


	【25555】オートフィル機能が効かない

Mappo - 05/6/4(土) 10:56 -


	引用なし

	パスワード

初めまして。オートフィル機能とユーザーマクロについて教えてください。
実は職場の方から、マクロが組まれたファイルを頂き、使ったところ、オートフィル機能が働かなくなりました。その方が言われるには、このファイルには、起動時にユーザーマクロへオートフィル機能を止めるマクロがあるとのことです。
その対処として、PLDT.xlsのマクロに
Sub DD()
Application.CellDragAndDrop = True
End Sub
と書いておけば、大丈夫だということなのですが、相変わらずドラッグ＆ドロップができず、オートフィル機能が働きません。
どうしたらいいのでしょうか？
どなたか、教えてください。


	【25556】Re:オートフィル機能が効かない

kobasan - 05/6/4(土) 12:49 -


	引用なし

	パスワード

▼Mappo さん　今日は

>その対処として、PLDT.xlsのマクロに
>Sub DD()
>Application.CellDragAndDrop = True
>End Sub
>と書いておけば、大丈夫だということなのですが、相変わらずドラッグ＆ドロップができず、オートフィル機能が働きません。
>どうしたらいいのでしょうか？
>どなたか、教えてください。

'
'
'ツール／オプション／編集タグ／ドラッグドロップ編集を行うにチェックする
'でもできます
'
'Sub DD()でなく、
'ThisWorkbookモジュールに下記を書き込むと問題を解消できると思います。

Private Sub Workbook_Open()
　　Application.CellDragAndDrop = True
End Sub


	【25560】Re:オートフィル機能が効かない

Mappo - 05/6/4(土) 22:57 -


	引用なし

	パスワード

▼kobasan さんこんばんは。
早速やってみました。
メニュー／オプションでも、ThisWorkBookモジュールにもうまくかけました。
ありがとうございました。

メニュー／オプションにチェックするのは、全く意外でした。
当たり前のことですが、マクロばかりに目を奪われていたため、基本を忘れていました。
kobasan、本当にありがとうございました。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

9769 / 13644 ﾂﾘｰ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free