Excel VBA 質問スレ Part81 (873ﾚｽ)
上下前次1-新
821(1): 11/24(日)00:03 ID:3rEoBJGn(1) AAS
書き忘れたけどAIのAPI使う時は会社で機密保持契約とかしたものだけ使ってね。
一般の無料AIとか、有料だけど単なる従量制のやつは情報漏洩扱いになる可能性あるから注意ね
822: 11/24(日)00:55 ID:uHX0nAvq(1) AAS
>>821
ありがとうございます
確かにそうですね‥APIは控えておこうと思います
823: 11/24(日)01:20 ID:5abmj+os(1) AAS
自作自演なのか？
Excel VBAもわからない人間が生成AIを使えるわけがない
824: 11/24(日)07:59 ID:ZLDzIIjA(1) AAS
恐怖のSEX上納システムってVBAで作れますか？
825: 11/24(日)09:23 ID:vxmTfPYM(1) AAS
>>819
まさにそう
分からない箇所は勘定科目すら空白でこっちで直してる
>>820
備考欄って書いたほうがよかったね
〇〇さん 〇〇町 タイムズ駐車場代
みたいに手入力で書いてくれてるから、支店ごとに入力内容違うし表記揺れも多い
826(1): 11/24(日)13:15 ID:gX6sLx6s(1) AAS
事務屋とシステム屋の溝は深いなと、毎度絶望的な気持ちになるよ
827(1): 11/24(日)13:30 ID:pgKmEkUK(1) AAS
本支店間でのデータのやり取りは、やよいの製品サポートサイトで『分散入力について』を参照
そのお作法に則って無くて、自前の入力フォームとかをExcel辺りで作って勝手にCSVでのやりとりをしてるなら、
会計ソフト側で受け入れられるレコードの仕様をキチンと把握しておかないと
勘定科目・補助科目・備考or摘要とかがすんなり難なく受け取れるなら、支店側でテキトーな文言記入してても
問題無く受け入れられるはず
尤も、支店側がデタラメなコードや存在しない科目とかを記入して来たら、ちゃんと校正チェックする作業は
必要だろうが、それが発生する・できてしまう部分を見直ししなきゃいけない
828: 11/24(日)14:56 ID:3A4Oynwa(1) AAS
>>826
俺も事務屋（経理）のはずなんだがな…
システム整えないと業務量が膨大すぎてしんでしまう
>>827
ありがとう。参照してみます。
なんか考えれば考えるほどVBAでどうにかするより、元のExcelファイル作り替えるか小口現金廃止するしかなさそうだね
829: 11/24(日)22:48 ID:kCRU65AC(1) AAS
弥生会計ユーザーライセンス払いたくなくて、エクセルでサブシステム作るパターンか
830: 11/25(月)00:33 ID:6q/A8E66(1) AAS
>>797
せいかい VBエディター
まちがい VBエディタ
831(1): 11/25(月)10:30 ID:2CaoOVjY(1) AAS
せいかい エディター
まちがい 工ディタ一
832: 11/26(火)00:52 ID:YZFc2jAF(1) AAS
>>831
タも夕にしろよ
833: 11/26(火)10:03 ID:HUZSegVv(1) AAS
せいかい エディター
まちがい 工デT夕一
834: 警備員[Lv.1][新芽] 11/26(火)13:09 ID:9aujKz/s(1) AAS
せいかい エディター
まちがい 工〒゛T夕ー
835: 11/27(水)08:56 ID:DvWkdvrP(1) AAS
そこまで崩していいんなら濁点も:にして、イはTよりλのが近くないか
836: 警備員[Lv.4][新芽] 11/27(水)09:12 ID:QoeWWjIA(1) AAS
いや、一気にやったら続かないじゃない
837: 11/27(水)12:57 ID:aPfi5OMm(1) AAS
Dim rg1, rg2 as Range
rg1 = Cells(1, 1) ' 2024-12-31
rg2 = Cells(2, 1) '(空欄)
rg2.value = rg1.value
このようにA1の"2014-12-31"をA2にコピーしようとすると、
A2のセルの値が45657になってしまいます
値そのままA2にコピーする方法をご教示いただきたくおもいます
よろしくお願いします
838(1): 11/27(水)13:52 ID:MVMSa9+B(1/2) AAS
セルの値をそのままコピーするためには、コピー先のセルの数値形式を日付に設定する必要があります。以下のコードで、A1の値をA2にそのままコピーできます。
vba
Dim rg1 As Range, rg2 As Range
Set rg1 = Cells(1, 1) ' 2024-12-31
Set rg2 = Cells(2, 1) '(空欄)
rg2.Value = rg1.Value
rg2.NumberFormat = rg1.NumberFormat ' 数値形式をコピー
839(1): 11/27(水)16:51 ID:HUtUy0ao(1) AAS
>>838
すみません、言葉足らずでした
A1には文字列がはいっており、
場合によっては日付のようにも見えますが、
日付ではないので、値は"2024-12-32"なども取り得ます
他から取得するデータなので、この文字列はどうしようもありません
この値を、VBAを用いて他のセルにコピーすると、
文字列なのに日付と解釈され、日時型の値としてコピーされてしまいます
これを防ぎたいというのが趣旨です
840(2): 11/27(水)18:21 ID:jEDz14aM(1) AAS
>>839
値を文字列変数に取得
値の設定先セルの書式を文字列に
変数値を設定先に代入
とやりたいことそのまま書く
上下前次1-新書関写板覧索設栞歴
あと 33 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 1.235s*