戻る  □一般操作のサロン  □ 使用方法  □ 新着記事  □ 新規に質問する!  □ トピック一覧  □ 検索  □ 過去ログ
[ 親トピックをトピックトップへ ]
このトピックに書きこむ
Name/
E-Mail/

└>このツリーのレス記事をメールで受信しますか? YES/ NO/
Title/
URL/
Comment/ 通常モード->  図表モード-> (←の場合適当に改行を入れて下さい)
タグが使用できます。例 ⇒ <font color="blue">文字</font>
解決!!ありがとうございました! 解決       保留中です・・・ 保留        迷宮入りorほかあたって見ます・・ 迷宮入       すいませ〜ん。誰か〜! Help! ←※回答者専用
解決したらチェック       保留(コードテスト中など・・)         解決不可orレスが全く付かなくてほかのサイトに行くときなど・・
削除キー/
(半角8文字以内) 

このトピック参照回数 :
Re[2]: 値をそのまま取得、しかしある一部が年月日付に変わってしまう

    [195279] Re[2]: 値をそのまま取得、しかしある一部が年月日付に変わってしまう-

    解決!!ありがとうございました! / 記事引用/メール受信=OFF■

    □投稿者/ 小堺 -(2022/09/23(23:18))
    □U R L/

      一樹さん
      >書式設定はどうなってますかね?
       表示形式を「標準」から「文字列」に変更でした。

      asahishi さん
      @、A勉強になりました。

      >@ マクロで値を拾ったり表示させるセルを予めセルの書式設定で
        表示形式を「標準」から「文字列」に変更するのでは駄目でしょうか・・・

      >A・日付にしない方法
       ttps://atmarkit.itmedia.co.jp/ait/articles/2203/14/news024.html

      @、Aで試したら
      うまくいきました。
      ありがとうございました。

      > Text プロパティを使って実際に表示
      今度やってみます。
      ***********************************
      一樹さん、asahishi さん
      お二人さんのご指導で解決いたしました。
      お二人に感謝です。




      ++++++++++++++++++++
      OS      ⇒OTHER
      Version⇒OTHER
      ++++++++++++++++++++




    [195278] Re[1]: 値をそのまま取得、しかしある一部が年月日付に変わってしまう-

    記事引用/メール受信=OFF■

    □投稿者/ asahishi -(2022/09/23(21:44))
    □U R L/

       初めまして。

       まず前置きですが自分は Excel に関しては知識が怪しいのであまり鵜呑みにはしないで下さい・・・

       まずコード1に関してですが

      | m = m + 1

      だとAB列に空行が出ずに連続で出てしまうみたいなので

      | m = m + 2

      と変更しました。

       で、こちらの環境(Windows XP + Excel 2010)では日付に変換されず普通に実行出来てしまいました・・・

       ところでマクロの話題ではなくなってしまうかもですがマクロで値を拾ったり表示させるセルを予めセルの書式設定で表示形式を「標準」から「文字列」に変更するのでは駄目でしょうか・・・

       古いエクセルでは普通に動いていたマクロなのかも知れません・・・

       ちょっとググってみましたがマクロで対処するなら Value プロパティではなく Text プロパティを使って実際に表示されている状態を取得する事でうまくいくかも知れません・・・

       外部サイトですが以下のページとかが参考になるかも知れません・・・

       ・Text プロパティ等に関して
       ttp://officetanaka.net/excel/vba/tips/tips115.htm

       ・日付にしない方法
       ttps://atmarkit.itmedia.co.jp/ait/articles/2203/14/news024.html

       少しでも参考になれば幸いです・・・

       よく分からない場合は他の方のアドバイスを御待ち下さい・・・




    [195277] Re[3]: 値をそのまま取得、しかしある一部が年月日付に変わってしまう-

    記事引用/メール受信=OFF■

    □投稿者/ 一樹 -(2022/09/23(21:38))
    □U R L/

      書式設定はどうなってますかね?
      ここを変更していないのであれば解りませんです。




    [195276] Re[2]: 値をそのまま取得、しかしある一部が年月日付に変わってしまう-

    記事引用/メール受信=OFF■

    □投稿者/ 小堺 -(2022/09/23(21:16))
    □U R L/

      一樹 さん
      >頭に ^ がついてないってことはないですか?

      ^ が頭についてます。

      F列の値 と AB列の値にも

      頭に ^ がついてます。


      ++++++++++++++++++++
      OS      ⇒OTHER
      Version⇒OTHER
      ++++++++++++++++++++




    [195275] Re[1]: 値をそのまま取得、しかしある一部が年月日付に変わってしまう-

    記事引用/メール受信=OFF■

    □投稿者/ 一樹 -(2022/09/23(21:05))
    □U R L/

      頭に ^ がついてないってことはないですか?




    [195274] 値をそのまま取得、しかしある一部が年月日付に変わってしまう-

    ■親トピック/記事引用/メール受信=OFF■

    □投稿者/ 小堺 -(2022/09/23(20:28))
    □U R L/
      前にお世話になったものです。
      
      Sheet1 読み込みシート(本元データ)F30行からF47行の
      
      値をそのまま取得したいんですが、
      
      年月日付に変わってしまいます。
      
      そのままの値を取得したいのですが
      
      アドバイスよろしくお願いいたします。
      
        (コード1)
            m = 2
           For i = 30 To 47 Step 2          ’30行から2行目づつ行う
           Worksheets("Sheet1").Cells(m, "AB").Value = _
           Worksheets("Sheet1").Cells(i, "F").Value  ’Sheet1のF30の値をSheet1のAB2へ取得
           m = m + 1
           Next
      
        (コード2)
           Worksheets("Sheet1").Range("A30:R47").Value = _
                    Worksheets("Sheet1").Range("N2:AE19").Value
                      ’Sheet1のN2:AE19値をSheet1のA30:R47に取得する
               ’N2:AE19値は、他のデータも含まれてます。
      
      Sheet1 読み込みシート(本元データ)
      
            F列
      
      30行      ^02-02
      31行      
      32行      ^05-04
      33行
      34行      ^06-06-07-07
      35行
      36行      ^02-03-03-03
      37行
      38行      ^08-08-11
      39行
      40行      ^03-04-03-03
      41行
      42行      ^06-08-08-08
      43行
       。
       。
      47行
      
      このようにSheet1の読み込まれてます。
      (コード1)を起動
      
      Sheet1 (コード1)を起動
      
            AB列
      
      02行      ^02-02
      03行      
      04行      ^05-04
      05行
      06行      ^06-06-07-07
      07行
      08行      ^02-03-03-03
      09行
      10行      ^08-08-11
      11行
      12行      ^03-04-03-03
      13行
      14行      ^06-08-08-08
      15行
       。
       。
      19行
      
      
      F30からそのままの値で取得してます。
      
      (コード2)を起動
      
      ここからが問題点なんです。
      
      このようになってしまいます。
      
      Sheet1 (コード2)を起動
      
            O列
      
      30行      2月2日
      31行      
      32行      5月4日
      33行
      34行      ^06-06-07-07
      35行
      36行      ^02-03-03-03
      37行
      38行      2011/8/8
      39行
      40行      ^03-04-03-03
      41行
      42行      ^06-08-08-08
      43行
       。
       。
      47行
      
      
      02-02、05-04 と 08-08-11
      
      (コード2)を起動すると
      
      年月日付になってしまいす。
      
      (本元データ)のF30からF47の値を
      そのまま値を(コード2)で取得できないんでしょうか。
      
      すいませんが
      アドバイスお願いいたします。
      


      この記事にはVBAのコードが含まれています。

      緑の太文字→注釈
      茶色の太文字→条件分岐
      赤の太文字→ループ
      青の太文字→その他



      ++++++++++++++++++++
      OS      ⇒OTHER
      Version⇒OTHER
      ++++++++++++++++++++



このトピック内容の全ページ数 / [0]

- Child Forum -
Edit:ゆう-G