• 締切済

    質問Excelで都道府県から入力している住所の データをコピぺして別のExcelに貼り付けた際に都道府県

    • 2018/5/31
    • あいす38

    Excelで都道府県から入力している住所の
    データをコピぺして別のExcelに貼り付けた際に都道府県を抜いて入力する関数が知りたいです。

    どのように関数を組めば良いのでしょうか?

    今現在、セルA1に一度貼り付け、セルB1に都道府県を抜いて入力できる関数が組んであります。
    直接、セルB1に貼り付けて、都道府県を抜きたいです。

    よろしくお願いします(><)

  • 回答

    • 2018/6/1
    • fujillin

    こんにちは

    少し無理やり感はありますが、VBAで対処してみました。

    ※ ご質問にある、B1セルだけを対象とするようにしてあります。
    ※ 都道府県名は漢字表記にのみ対応しています。
    ※ 以下を、対象とするシートのシートモジュールにコピペしてみてください。

    B1セルに都道府県付きで入力すると、都道府県名が削除されます。
    (実在しない都道府県名や都道府県名なしの場合は、何もしません)

    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim prefName, i As Integer
    Dim p As String, s As String

    If Target.Address <> "$B$1" Or Target.Value = "" Then Exit Sub
    s = Trim(Target.Value)
    prefName = Split("北海道,青森県,岩手県,宮城県,秋田県,山形県,福島県,茨城県,栃木県,群馬県,埼玉県,千葉県,東京都,神奈川県,新潟県,富山県,石川県,福井県,山梨県,長野県,岐阜県,静岡県,愛知県,三重県,滋賀県,京都府,大阪府,兵庫県,奈良県,和歌山県,鳥取県,島根県,岡山県,広島県,山口県,徳島県,香川県,愛媛県,高知県,福岡県,佐賀県,長崎県,熊本県,大分県,宮崎県,鹿児島県,沖縄県", ",")

    For i = LBound(prefName) To UBound(prefName)
     p = prefName(i)
     If Left(s, Len(p)) = p Then
      Application.EnableEvents = False
      Target.Value = Trim(Mid(s, Len(p) + 1))
      Application.EnableEvents = True
      Exit For
     End If
    Next i
    End Sub

    続きを読む

  • 締切済

    質問晋三 ロシアに行ったと思ったら、今度はアメリカか モリカケから逃げて外遊ばかりするな

    • 2018/5/28
    • kame100

    晋三 ロシアに行ったと思ったら、今度はアメリカか。
    アメリカに行っても、いつもの北朝鮮に圧力・拉致被害者・法の支配
    云うだけ。反対に米国の貿易赤字削減の宿題云われるだけ。

     外交が出来ないのに、モリカケから逃げて外遊ばかりするな ! !

     ロシアに行っても、平和条約の締結・北方領土の経済協力 そんな事聞き飽きた。
    今回 行ったからと云っても、何にも成果がない。
    反対に、以前は無かった北方領土の軍事基地化さえ進んでいる。

     仕事しているフリした、外遊するのは止めて欲しいと思うのですが、
    皆さんどう思いますか。

    続きを読む

  • 回答

    • 2018/5/29
    • noname#542766967

    >仕事しているフリした、外遊するのは止めて欲しいと思うのですが、


    質問者様は、2010年の あの事件 をご存じでしょうか。

    4月20日:口蹄疫発生→宮崎県は消毒液の不足を報告したが政府に指示はなし

    4月30日:赤松大臣→外遊 帰国後は民主党候補者の応援に行く
         (自民党は農林水産委員会の開会を政府に要求→政府は拒否)

    5月1日:殺処分8000頭越える → 宮崎県は自衛隊に災害派遣要請
        鳩山首相、熊本の水俣病慰霊祭に参加。宮崎には行かず。
    5月8日:殺処分60000頭越える

    5月8日:赤松大臣帰国
    5月10日:赤松大臣宮崎視察(土日の休暇後) 以下の発言
    「一部報道では対応が遅いと言われているが心外だ。 できることはすべてやっている」

    5月19日:自民党口蹄疫対策本部の記者会見での江藤拓議員の発言
    「10年前の感染では、ただちに100億の予算で対策がなされたが、現在はこの段階になっても国から1箱も消毒薬が支給されていない。」


    宮崎では以前にも口蹄疫が発生していますが、その時は政府(自民党)の処置により被害は抑えられています。

    民主党政権はFAO(国連食糧農業機関)からの口蹄疫の専門家の派遣を断ってもいます。

    続きを読む

  • 締切済

    質問星野リゾートが無い都道府県はどこですか?

    • 2018/4/26
    • ロボット2016

    星野リゾートの宿泊施設が一切無い都道府県を教えてください。
    関連グループとか、株を持っているとかそういうのも無い都道府県です。
    宜しくお願いします。

  • 回答

    • 2018/4/27
    • zssasuke

    岩手県
    宮城県
    秋田県
    山県県
    福島県
    茨城県
    群馬県
    埼玉県
    千葉県
    新潟県
    富山県
    福井県
    岐阜県
    愛知県
    三重県
    滋賀県
    大阪府  新今宮に建設決定
    兵庫県
    奈良県
    和歌山県
    鳥取県
    岡山県
    広島県
    山口県
    徳島県
    香川県
    愛媛県
    高知県
    福岡県
    佐賀県
    長崎県
    熊本県
    宮崎県
    鹿児島県

    続きを読む

  • 締切済

    質問6月末に九州へ4泊5日の旅行に行くつもりで,レンタカーを借りて移動します。 計画のルートは北九州>大

    • 2018/4/8
    • vincent2002

    6月末に九州へ4泊5日の旅行に行くつもりで,レンタカーを借りて移動します。
    計画のルートは北九州>大分>熊本>佐賀>福岡です。
    以上の各地にお薦めの観光地と美味しい物を教えてくれませんか。

  • 回答

    • 2018/4/8
    • pb1966

    はじめまして。

    私が以前行ったコースですと、別府から由布院を(やまなみハイウェイかな?)走りました。

    由布岳をみながら景色が大変良かったのを思い出します。

    あと、クルマで行かれるなら、熊本から(宮崎県)高千穂まで行くことも可能ですね。

    パワースポット好きの私としては、是非とも行っていただきたいエリアです。

    高千穂峡とかは良いと思いますよ。

    それと高千穂の居酒屋さんで「けんちゃん」というお店にいきましたが、
    8月頃そこでいただいた「焼きナス」は美味しかったです。
    地元でとれるとても大きなナスでしたね。

    続きを読む

  • 締切済

    質問「丸山」さんという姓は長野に多いですか?

    • 2018/4/5
    • kanako_hoshi

    「丸山」さんという姓は長野に多いですか?

    どうぞお教え下さい。

  • 回答

    • 2018/4/6
    • kantansi

    多いですね。 以下の通り、長野では4番目に多い姓です。

    丸山さん都道府県別ランキング

    都道府県 都道府県内順位 都道府県内人数

    北海道    110位    およそ7,000人
    青森県    335位    およそ720人
    岩手県    483位    およそ310人
    宮城県    251位    およそ1,300人
    秋田県    370位    およそ380人
    山形県    100位    およそ1,900人
    福島県    225位    およそ1,400人
    茨城県    239位    およそ2,400人
    栃木県    104位    およそ3,400人
    群馬県     67位    およそ5,000人
    埼玉県     71位    およそ14,200人
    千葉県    111位    およそ8,900人
    東京都     66位    およそ26,300人
    神奈川県    79位    およそ15,500人
    新潟県     14位    およそ20,200人
    富山県    184位    およそ1,000人
    石川県    174位    およそ1,100人
    福井県    215位    およそ670人
    山梨県     50位    およそ3,000人
    長野県      4位    およそ24,900人
    岐阜県    150位    およそ2,600人
    静岡県    164位    およそ4,000人
    愛知県    138位    およそ9,700人
    三重県    197位    およそ1,800人
    滋賀県    169位    およそ1,500人
    京都府    180位    およそ2,600人
    大阪府    176位    およそ8,800人
    兵庫県    114位    およそ8,000人
    奈良県    172位    およそ1,400人
    和歌山県    70位    およそ2,200人
    鳥取県    245位    およそ420人
    島根県    384位    およそ350人
    岡山県    118位    およそ2,800人
    広島県    164位    およそ2,800人
    山口県    231位    およそ1,000人
    徳島県    160位    およそ900人
    香川県    156位    およそ1,300人
    愛媛県    192位    およそ1,400人
    高知県    844位    およそ110人
    福岡県    124位    およそ7,200人
    佐賀県    517位    およそ280人
    長崎県    436位    およそ550人
    熊本県     94位    およそ3,300人
    大分県    178位    およそ1,200人
    宮崎県    135位    およそ1,400人
    鹿児島県   136位    およそ2,000人
    沖縄県   1,190位    およそ70人

    続きを読む

  • 締切済

    質問同和の方々や偽同和の方々の節税対策を、税務署の方々が、教えるのですか?

    • 2018/3/24
    • 祭子

    同和の方々や偽同和の方々の節税対策を、税務署の方々が、教えるのですか?

  • 回答

    • 2018/3/25
    • パイロギグホズミ

    節税より脱税の方が適切です。同和部落とは無縁の宮崎県都農町にえせ部落を作り、町から補助金を受け取りましたが、今の真の部落民は数人後はえせ部落民ばかり、税金の数%を自民党に上納で手討ち。全国のえせ部落民は自民党の集票マシーンとして活躍しています。

    続きを読む

  • 締切済

    質問事務職です。先日お客様と電話をしていて(わざに)と言った後、先輩がそんな事は言ってはいけない、(わざ

    • 2018/3/21
    • マジ子

    事務職です。先日お客様と電話をしていて(わざに)と言った後、先輩がそんな事は言ってはいけない、(わざわざ)と言いなさいと言ったのですが、えーそうかなあ?良く分からないと思ったのですが、皆様教えて下さいそうなんですか?

  • 回答

    • 2018/3/22
    • OKAT
    • ベストアンサー

    わざ‐に 【態─】
    方言

    〔副〕
    (1)わざわざ。
    《わざに》宮城県玉造郡・仙台市・山形県・福島県相馬郡・新潟県中頸城郡・山梨県・三重県志摩郡・鳥取県西伯郡・島根県「わざに来たのに逢われん」・岡山県真庭郡・広島県・徳島県・香川県三豊郡・小豆島・愛媛県・
    《わざえ》山形県最上郡・
    《わざおか》茨城県・
    《わざく》宮崎県日向・
    《わざくら》島根県「わざくら来んされーでもよかったに」・広島県・高田郡・長崎県対馬・壱岐島・
    《わざくれ》奈良県・吉野郡・広島県高田郡
    《わざこざ》山口県浮島・愛媛県
    《わざこぜ》高知県
    《わざさら》山形県米沢市
    《わざぶ》山形県東置賜郡・北村山郡
    《わざほか》茨城県稲敷郡
    《わざやく》新潟県・山梨県南巨摩郡・長野県下伊那郡・愛知県北設楽郡・徳島県・海部郡・香川県高松市・大分県大分郡
    《わざやくに》香川県高松市・伊吹島
    《わじゃに》秋田県鹿角郡
    《わだくら》島根県石見
    《わだこだ》山口県大島
    《わだに》島根県石見
    《わんざに》秋田県南秋田郡・平鹿郡・新潟県西頸城郡・
    《わんじぇぁん》秋田県由利郡
    《わんじゃね》青森県津軽
    (2)わざと。故意に。
    《わざに》岩手県上閉伊郡「わざにあんな話をしたのだ」・山形県・福島県・新潟県中頸城郡・香川県三豊郡・小豆島
    《わざえ》山形県最上郡
    《わざき》鹿児島県
    《わざほか》茨城県稲敷郡
    《わざやく》新潟県佐渡・東蒲原郡
    《わじゃに》秋田県鹿角郡
    《わっさに》山形県東置賜郡
    《わらりっと》徳島県海部郡
    《わんじゃに》秋田県
    《わんじゃね》青森県
    (3)冗談に。
    《わんじゃね》青森県津軽075

    続きを読む

  • 締切済

    質問和牛

    • 2018/3/18
    • billylaw

    山陽線有沒有和牛介紹

  • 回答

    • 2018/3/18
    • 日本旅遊成癮者SE

    山陽由山口、廣島、岡山組成。
    而和牛分布如下,所以沒有山陽出產的和牛,但還是有吃的到其他和牛的店。
    熊野牛(和歌山県)
    白老牛(北海道)
    伊万里牛(佐賀県)
    京の肉(京都府)
    能登牛(石川県)
    びらとり和牛(北海道)
    長崎和牛(長崎県)
    阿波牛(徳島県)
    出雲香味牛(島根県)
    信州牛(長野県)
    上州牛(群馬県)
    十勝和牛(北海道)
    那須牛(栃木県)
    阿知須牛(山口県)
    山形牛(山形県)
    神戸牛(兵庫県)
    但馬牛(兵庫県)
    米沢牛(山形県)
    近江牛(滋賀県)
    飛騨牛(岐阜県)
    前沢牛(岩手県)
    石垣牛(沖縄県)
    松坂牛(三重県)
    佐賀牛(佐賀県)
    宮崎牛(宮崎県)
    仙台牛(宮城県)

    続きを読む