[過去ﾛｸﾞ]
VBAなんでも質問スレ Part2 [転載禁止]©2ch.net (1002ﾚｽ)
VBAなんでも質問スレ Part2 [転載禁止]©2ch.net http://mevius.5ch.net/test/read.cgi/tech/1432173164/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索
歴削→次ｽﾚ
栞削→次ｽﾚ
過去ﾛｸﾞﾒﾆｭｰ
646: デフォルトの名無しさん [sage] 2018/11/14(水) 18:50:01.08 ID:JBsUV7Ak ExcelとAccessは専門スレが別にあるけどな http://mevius.5ch.net/test/read.cgi/tech/1432173164/646
647: デフォルトの名無しさん [sage] 2018/11/14(水) 19:18:54.83 ID:yWBiOXbZ 学校の課題なんですがさっぱり分かりません コードの入力？を教えてほしいです https://i.imgur.com/F4T8tlt.jpg https://i.imgur.com/3L2Gjq0.jpg http://mevius.5ch.net/test/read.cgi/tech/1432173164/647
648: デフォルトの名無しさん [sage] 2018/11/14(水) 19:27:08.71 ID:yRk1YRk6 >>647 その宿題をやるには「フォームの作成」という作業が必要で、それは文章だけの掲示板じゃとても説明できない http://mevius.5ch.net/test/read.cgi/tech/1432173164/648
649: デフォルトの名無しさん [sage] 2018/11/14(水) 19:33:23.32 ID:JBsUV7Ak 二次方程式 VBAのキーワードでぐぐればそれなりに情報はあるよ http://mevius.5ch.net/test/read.cgi/tech/1432173164/649
650: デフォルトの名無しさん [sage] 2018/11/14(水) 20:36:22.41 ID:yWBiOXbZ >>648 フォームの作成ってこれですか？ ここしかわかんなかったです… https://i.imgur.com/74SP9RE.jpg http://mevius.5ch.net/test/read.cgi/tech/1432173164/650
651: デフォルトの名無しさん [sage] 2018/11/14(水) 20:37:40.54 ID:yWBiOXbZ >>649 調べてみます ありがとうございます http://mevius.5ch.net/test/read.cgi/tech/1432173164/651
652: デフォルトの名無しさん [sage] 2018/11/14(水) 22:42:46.78 ID:iSnTRpeY 学校でExcelの課題出るのか 全員Excel入りのWindows機もってる前提なのか http://mevius.5ch.net/test/read.cgi/tech/1432173164/652
653: デフォルトの名無しさん [sage] 2018/11/14(水) 22:53:14.87 ID:JBsUV7Ak 商業科高校と大学生は皆持たされる時代やね http://mevius.5ch.net/test/read.cgi/tech/1432173164/653
654: デフォルトの名無しさん [] 2018/11/15(木) 12:24:37.27 ID:yIPB3Fsn なきゃ学校にあるPC使うだけやんけ 変な事気にする奴やな http://mevius.5ch.net/test/read.cgi/tech/1432173164/654
655: デフォルトの名無しさん [sage] 2018/11/15(木) 14:25:13.91 ID:njFgw0Uw >>653 商業科の電卓名人みないな奴は、もぅおらんのか http://mevius.5ch.net/test/read.cgi/tech/1432173164/655
656: デフォルトの名無しさん [sage] 2018/11/15(木) 23:21:50.05 ID:XqpfGkJo VBAで3つ数値があった時、最大値を表示させたい時 下記URLのNo.4の回答のelseifを使ったものがありますが、 elseifを使わずにelseだけで表示しようとすると、 どのようになるのでしょうか？ 宜しくお願いします ttps://oshiete.goo.ne.jp/qa/5352661.html http://mevius.5ch.net/test/read.cgi/tech/1432173164/656
657: デフォルトの名無しさん [sage] 2018/11/15(木) 23:28:15.36 ID:XqpfGkJo 分かりづらそうなので追記で、下記のところです。 宜しくお願いします a = 10 b = 200 c = 30 Max = a If b > Max Then Max = b ElseIf c > Max Then Max = c End If http://mevius.5ch.net/test/read.cgi/tech/1432173164/657
658: デフォルトの名無しさん [sage] 2018/11/15(木) 23:37:03.06 ID:dI+Dsxy9 Max = a If b > Max Then Max = b Else If c > Max Then Max = c End If http://mevius.5ch.net/test/read.cgi/tech/1432173164/658
659: デフォルトの名無しさん [sage] 2018/11/16(金) 06:18:18.01 ID:biDBAQdb >>658 ありがとうございます 試してみたいと思います http://mevius.5ch.net/test/read.cgi/tech/1432173164/659
660: デフォルトの名無しさん [sage] 2018/11/16(金) 06:57:12.53 ID:fQoG7lNZ そもそも657では最大値求められないだろ。 なぜ他の2つと比較してから決めないのか http://mevius.5ch.net/test/read.cgi/tech/1432173164/660
661: デフォルトの名無しさん [sage] 2018/11/16(金) 07:24:20.18 ID:biDBAQdb すいません、まだ初心者でまだ理解が追いついていなくて とりあえず最大値求めるにはこういう形...とかで覚えようとしてて....頑張ります http://mevius.5ch.net/test/read.cgi/tech/1432173164/661
662: デフォルトの名無しさん [sage] 2018/11/16(金) 07:30:47.41 ID:1oL4uemZ 658でも最大値は求められない 試しに a = 1 b = 2 c = 3 で試してみるといい。Maxが2になってしまう Ifだけでやる場合の正解の一例 Max = a If b > Max Then Max = b If c > Max Then Max = c http://mevius.5ch.net/test/read.cgi/tech/1432173164/662
663: デフォルトの名無しさん [sage] 2018/11/16(金) 07:35:16.96 ID:1oL4uemZ >>661 If Elseの構文は、最初のIfの条件が成立したらElse以降は処理されずEnd Ifまで飛ばされる つまり、 a = 1 b = 2 c = 3 だった場合、 b > Maxが成立したらc > Maxの部分は飛ばされてしまうからMaxは2のまま終わってしまう http://mevius.5ch.net/test/read.cgi/tech/1432173164/663
664: デフォルトの名無しさん [sage] 2018/11/16(金) 07:44:30.26 ID:fQoG7lNZ elseやelseifは先行条件でTrueにならない場合にしか実施されない仕組みなことを理解しましょう http://mevius.5ch.net/test/read.cgi/tech/1432173164/664
665: デフォルトの名無しさん [sage] 2018/11/16(金) 08:11:14.61 ID:nU0jfNiC >>661 このレベルを形で覚えようとしている貴方にプログラミングは向いてない http://mevius.5ch.net/test/read.cgi/tech/1432173164/665
666: デフォルトの名無しさん [sage] 2018/11/16(金) 09:26:27.62 ID:RKO+v0zL ID変ったかも知れませんが>>656です 皆さんありがとうございます >>665 手痛いレスですが、出来るところまで頑張ろうと思います。プログラマーではないですが基本は覚えないと連携し辛い位置の役職のため頑張ります。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/666
667: デフォルトの名無しさん [sage] 2018/11/16(金) 09:39:56.01 ID:fQoG7lNZ 本当のプログラミング初学者なら仕方ない。制御構文なんてどの言語も似てるので、1つ覚えれば次は勘が効くようになるよ、長い目でがんばりなされ http://mevius.5ch.net/test/read.cgi/tech/1432173164/667
668: デフォルトの名無しさん [sage] 2018/11/17(土) 01:11:45.44 ID:A0ACnair 最大値を求めたいならWorkSheetFunction.MAX使えば良いんじゃね? http://mevius.5ch.net/test/read.cgi/tech/1432173164/668
669: デフォルトの名無しさん [sage] 2018/11/17(土) 12:08:31.57 ID:vo1go4s2 自民党ですらエクセル操作ミスるくらいだからな http://mevius.5ch.net/test/read.cgi/tech/1432173164/669
670: デフォルトの名無しさん [sage] 2018/11/17(土) 12:09:52.07 ID:vo1go4s2 税金の計算もおかしくね？って思う http://mevius.5ch.net/test/read.cgi/tech/1432173164/670
671: デフォルトの名無しさん [] 2018/12/16(日) 00:58:32.35 ID:SwJ6GlUb >>668 わにわに http://mevius.5ch.net/test/read.cgi/tech/1432173164/671
672: デフォルトの名無しさん [] 2018/12/16(日) 01:01:16.65 ID:SwJ6GlUb パニックを、5人がかりでやれば楽勝だろ、とか言ってるようなもの。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/672
673: デフォルトの名無しさん [sage] 2018/12/17(月) 09:39:23.91 ID:5sE/cfMN エクセルVBAじゃなかったらどうするの http://mevius.5ch.net/test/read.cgi/tech/1432173164/673
674: デフォルトの名無しさん [sage] 2018/12/18(火) 22:55:12.06 ID:A6rQVaax 確かに。 エクセロかも知れないもんな。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/674
675: デフォルトの名無しさん [] 2018/12/26(水) 21:53:30.63 ID:KrpjpPkw VBA初心者です。少し長くなってしまいますが質問です。 ・やりたいこと １：現マクロ有効ブックのsheet1にフォームボタン設置する。 ２：押すとC:\Users\Public\動物まとめ.xlsx をバックグラウンドで開き、その中のシート名"カピバラ情報"の E列4行目から5行目6行目...と、空白が来るまでの情報を取得しする。 ３：現マクロ有効ブックに新しくsheet2を作り、その新シートのA1からA2A3...に取得した情報を書き込む。 現在のマクロは下記ですが上手くいかないです。 Option Explicit Sub practice() Dim i As Long i = 4 Dim fullPass As String 'セルのB3に C:\Users\Public\動物まとめ.xlsxと記述 fullPass = Range("B3") Dim wb As Workbook Dim Anothersheet As Worksheet Workbooks.Open fullPass Set Anothersheet = wb.Worksheets("カピバラ情報") Sheets.Add After:=ActiveSheet Range("A1").Select Do While Cells(5, i).Value <> "" i = i + 1 Loop Call wb.Close End Sub 上手く情報を取得できないのでアドバイスお願いします。 http://mevius.5ch.net/test/read.cgi/tech/1432173164/675
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 327 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.016s