教えてもらえば、とっても簡単な事でした。 マクロを実行せずに開きたいファイルを左クリック(選択) SHIFTボタンを押しながら 開きたいファイルを ダブルクリック!! WEB知識ゼロ ～マクロを実行せずにExcelファイルを開く方法～ - lands_end’s blog. 通常のExcelを開く時よりも若干時間が掛かりましたが、 無事に開きたかった画面が開きました。 あとは、本なりネットなりの紹介サイトに従って、VBAを直すだけでした。 ★ワンポイントその1 ファイルの開き方★ 環境によると思うのですが、私の環境では以下のような状況でした。 社内LANで共有しているフォルダを選択し、そのフォルダの中にあるファイルを直接開こうとしたら、 なぜか!SHIFTを押してもダメ でした!! マクロを実行せずにExcelファイルを開くためには、 まずは エクセルを起動 開く→該当ファイルのあるフォルダ→開きたいファイルの順に選択 SHIFTを押しながらダブルクリック これで開きました。 1度開いた後は、Excelを起動すると「最近開いたブック」の中に存在すると思います。 そのファイルをSHIFTを押しながらダブルクリックしたら開けました。 ★ワンポイントその2 SHIFTは押し続ける!★ SHIFTを押しながら~ とここまで書いてきて言うのも何ですが、 正確には 「目的の画面が開ききるまでSHIFTを押し続ける!」 です。 途中でSHIFTを離すと、マクロが動いてダメな時がありました。 ★ワンポイントその3 検索方法★ ネットでググルと解決方法が一杯出てきます。 でも、 最初は見つけられませんでした。 その理由は、自分の検索方法が拙かったようです。 「エクセル マクロ 開かない」 「エクセル マクロ そのまま開く」 これではダメ でした。 素人には、 『実行しない』なんて単語 は思いつきませんでした! 「エクセル マクロ 実行せずに」 これなら、大量に目的のページがヒットしました。 やれやれです。 自分のように、WEB知識ゼロで社内システムをやる人なんて居ないと思いますが、 もしも同じ境遇の人が居たら、 そしてもしも同じ状況に陥って困っている人が居たら、 役に立つかも知れないと思って記事にしてみました。 万一お役に立つ機会がなくても、これだけ文章を書けば、 忘れっぽい私も 『SHIFTを押しながら開く』を忘れない ので、 良しとします。 応援ありがとうございます! にほんブログ村
配列の戻り値をSubに返す。 それで、下記のコードを考えましたが、途中で分からなくなりました。 Sub 並べ替え() Dim myarr() As Variant myarr = Range("A1:B22") ここのコードがわからないです。 End Sub Function myArray(myRange As Range) As Variant Dim i As Long, j As Long For i = LBound(myarr, 1) To UBound(myarr, 1) For j = LBound(myarr, 2) To UBound(myarr, 2) ここのコードがわからないです。 Next j Next i End Function 配列の戻り値でできなくて、範囲を渡すほうでも考えましたができまでんでした。 お手数ですが、ご教示をお願いします。 Visual Basic
VBSを利用してエクセルにてデータ整理をしたいと思っております. やりたいことは以下の3点です. 1. デスクトップにあるVBSにファイルに読み込みたいファイルをD&Dしてフルパスを取得する 2. 取得したフルパスをエクセルに記入する 3. 記入されたフルパスを利用してデータ整理用マクロを起動する 1と2は以下のVBSで可能でした. また,3で起動するVBAはエクセルから起動した場合は正常に起動します. しかし,VBSにて1~3までをやろうとすると以下のようなエラーが出てしまいました. **************************************************** エラー文 行:24 文字:1 エラー:マクロ '(エクセルの入ってるディレクトリまでのパス)! test'を実行できません.このブックでマクロが使用できないか,またはすべてのマクロが無効になっている可能性があります. コード: 800A03EC ソース: Microsoft Excell **************************************************** ちなみに2010のexcelを64bit,メモリ6GBのwindows7にて使用しております. なにかお気づきの方がおりましたらアドバイスお願いします. **************************************************** VBS本文 Dim Exl Dim objExcelApp Dim Exlname Dim rngDest Dim Arg Dim I Set Exl=Nothing Set guments Set Exl=GetObject(, "lication") 'Set 'Set Exlname=WScript. FullName("lication") With Exl Set sheets("sheet1")("A1") For I=0 To - 1 (I) Set (1) Next End With ("(エクセルの入ってるディレクトリまでのパス)! test") Set rngDest=Nothing
単にOPENイベントを一時的に停止させたいだけであれば、 特定のブックの時だけ、「Application. EnableEvents = False」にして開けばいいのです。 例: Application. EnableEvents = False "" Application. EnableEvents = True 61 ユーザーがこの回答を役に立ったと思いました。 · この回答が役に立ちましたか? 役に立ちませんでした。 素晴らしい! フィードバックをありがとうございました。 この回答にどの程度満足ですか? フィードバックをありがとうございました。おかげで、サイトの改善に役立ちます。 フィードバックをありがとうございました。
イヌの視覚の調べ方 Q. 視力を調べたら1・0で、メガネはいらないって。 A. よかったね。 Q. 家族の中でイヌのポチだけは目がいいのかどうかわからない。イヌではどう調べるのかな。 A. イヌはしゃべらないから、1・0というような正確な視力は測れないの。大まかに、見えているかどうかを確認するらしいよ。 Q. どうすればわかるの? A. イヌの目の前に急に手を出す検査では、イヌが怖がって目をつぶれば見えているとわかる。綿のボールを目の前で落とし、落ちていくボールをイヌが目で追うかどうか調べることもあるわよ。 Q. どうして綿のボール? A. 軽くて、落ちても音がしないでしょ? 音がすると、見えていなくてもイヌはそちらに顔を向けるから、音がしない綿を使うの。 Q. なるほど。 A. だっこしたイヌを机に近づけていく方法もあるわよ。見えていれば、イヌは反射的に前脚を机の上につこうとして出す。家具などで迷路を作り、ぶつからずにちゃんと動けるかどうか調べることもあるの。 Q. どれぐらい遠くまで見えているのかはわからないのかな? A. 目の構造や目の周りの筋肉の性質から、多くのイヌは1メートルぐらい先までしかはっきり見えないと考えられているの。ただし、猟犬として活躍しているイヌは、遠くまではっきり見えるようよ。 Q. ネコはどう調べるの? A. イヌと同じように調べるけれど、迷路試験だけは、逃げる恐れがあるのでやらないんだって。 飼い主はイヌの視力が落ちていても、気づかないことがある イヌはにおいや音からも情報を得ている Q. 調べなくても、見えなければ飼い主が気がつくんじゃない? A. 実際には、気がつかないことがよくあるそうよ。 Q. ええっ。 A. 周りの世界の情報を得るための「五感」は知っている? Q. うん。物を見る視覚と音を聞く聴覚、においをかぐ嗅覚、物に触れる触覚、味を知る味覚でしょ? A. そう。人間は通常、情報の8割以上を視覚から得ているけれど、イヌは嗅覚で4割、聴覚で3割の情報を得ていて、視覚からは2割程度と考えられているの。だから、慣れた家の中なら見えなくても問題なく生活できるのよ。 Q. 目の見えない犬 補助具. へえ、すごいね。 A. 色の見え方は人間の方が豊かよ。人間の色覚は3種類で、赤、青、緑の3原色を見分けられるけれど、イヌやネコの色覚は2種類だけ。赤や緑の区別ができないの。 Q.
0とした数値で成績が出されますが、犬に縞模様を取ってくるように訓練し、縞模様の幅を徐々に細かくしていくと、ある所を境にして縞模様と単なるグレー一色の見分けがつかなくなるそうです。この限界点を人間の視力に換算すると0. 26程度だとか。たとえば視力1. 0の人が「A」という文字を10メートル離れたところから判別できるとき、犬は2. 目の見えない犬のための道具. 6メートル地点まで近づいてようやく見えるといった感じです。 犬の近視と遠視 目に入ってきた光が網膜より手前で焦点を結び、遠くがぼやけて見える状態を近視(きんし)、その逆の状態を遠視(えんし)と呼びます。アメリカ・ウィスコンシン大学の獣医学部が、240頭の犬を対象にして視力に関する研究を行ったところ、ほとんどの犬が正視(近視でも遠視でもない)だったそうです。しかし犬種によっては明らかな特徴が見られ、たとえば ロットワイラー 、 ミニチュアシュナウザー 、 ジャーマンシェパード においては半数近くが近視傾向にあり、逆に グレーハウンド は遠視傾向にあったそうです。犬種によって特定の傾向が見られることから、遺伝や選択繁殖が影響したものと考えられます。 犬も平気でうそをつく?