• ベストアンサー

セルの一部のフォントの置き換え可能ですか?エクセル2000

sakenomoの回答

  • ベストアンサー
  • sakenomo
  • ベストアンサー率52% (35/67)
回答No.2

A列以外の適当なセルを選び、そのセルの書式(フォント)を変更したいフォントに設定してください。 上記のセルが選択された状態で、以下のマクロを実行してみてください。 作動する範囲はA1:A100になっています、実情に合わせて書き換えてください。 #このマクロでは、各セル中で変更できる文字は1つだけです。 Sub test()  For Each c In Range("A1:A100") '←作動範囲   p = InStr(c, "店")   If p > 0 Then    c.Characters(Start:=p, Length:=1).Font.Name = _    ActiveCell.Font.Name   End If  Next End Sub

usubeni
質問者

お礼

どうも、ありがとうございました。 一文字だけでいいんです。 うまくいきました。

関連するQ&A

  • エクセル 置き換えをするとセル内のフォントサイズが

    エクセルでフォントサイズがバラバラな文字列が入ってるセルで置き換えをすると セル内のフォントサイズが統一されてしまいました フォントサイズを統一させずに置き換えする事は可能でしょうか? VBAとかマクロをつかわなければならない時はできれば使い方を詳しくおしえて頂きたいです。

  • エクセル 置き換えをするとセル内のフォントサイズが

    先ほど間違えてベストアンサーを出してしまったので連投失礼します。 エクセルでフォントサイズがバラバラな文字列が入ってるセルで置き換えをすると セル内のフォントサイズが統一されてしまいました フォントサイズを統一させずに置き換えする事は可能でしょうか? VBAとかマクロをつかわなければならない時はできれば使い方を詳しくおしえて頂きたいです。

  • エクセル2007 同一データが連続したセルの結合について

    はじめて投稿させていただきます。 うまく説明できるかどうか判りませんが、よろしくお願いします。 エクセル2007 で以下のような結果を得られるようなマクロを作りたいと考えています。 横方向にA列~C列の3つの連続したセル内容が同一で縦方向に2つ以上連続した場合のみ、それらの行を結合させたいのです。具体的には下図のような感じです。 何かよい方法があればアドバイスいただきたいと思います。どうかよろしくお願いします。 A列     B列     C列     D列 機種     区分    ユーザー名   納品数 ABC     あああ    田中商店    10 ABC     あああ    田中商店    20 ABC     あああ    田中商店    30 XYZ      いいい    田中商店    25 XYZ      ううう     山田商事    40        ↓ ↓ ↓ ↓ ↓ A列     B列     C列     D列 機種     区分    ユーザー名   納品数                            10 ABC     あああ    田中商店    20                            30 XYZ     いいい    田中商店    25 XYZ     ううう     山田商事    40

  • エクセルで検索、並び替えの方法

    エクセルで以下のような並び変えはできないでしょうか? エクセルでA列とB列に名前が入っています。 A列、B列の名前は若干違います。 B列の名前をA列に揃えて並び変えることはできないでしょうか?  「処理前」       「処理後」  A   B        A   B 伊藤  山田      伊藤         山田  田中      山田  山田 鈴木  鈴木      鈴木  鈴木 田中  伊集院     田中  田中                     伊集院 宜しくお願いします。

  • エクセル 文字にリンクを入れる方法

    エクセルでの質問です。 たとえばA:1に 山田商店 A:2に田中商店と入力 次にB:1に山田商店のURLを入力 B:2に田中商店のURLを入力 これをC:1には 山田商店という文字にB:1で入力したURLを リンクさせるやり方はあるでしょうか? 私の稚拙な文章だと質問がわかりにくいかも知れませんが、 ようは、A列に商店名 B列にその商店のURL C列に商店名にURLの リンクを張ったものを入れたいのです。 ご存知の方がいましたら、よろしくお願いいたしますm(__)m

  • エクセルでこんな集計できますか?

    会社の営業成績の表を作成しているのですが 個人別に担当物件数とその合計金額を出したいと思っています。 例えば以下のような表があります。 A列に名前、B列に金額を入力しています。 A列     B列 山田    3000 山田    5000 田中    3000 鈴木    3000 田中    4000 山田    5000 鈴木    3000 というような表から 山田  3件 13000 田中  2件  7000 鈴木  2件   6000 といった感じで個人別に件数と合計金額を出したいのです。 件数はCOUNTIF関数で簡単に出るのですが金額の出し方が分かりません。 分かる方いらっしゃいましたらご指導お願いいたします。  

  • Excel2003でセル内の一部の文字をまとめて消去したい

    佐藤一郎・田中次郎 鈴木一太郎・山田三郎      ・       ・ と、ひとつのセル内に名前が二つ・を挟んで入力 されていて、同じ列に並んでいます(A1~A100の様に) セル内の右(または左)の名前と・をA1~A100迄 いっぺんに消去したいのですがマクロまたはVBAで 出来るのでしょうか。 どなたかご教示を。

  • エクセルのデータ並べ替え(抽出)の方法

    エクセルのデータ並べ替え(抽出)の方法 を教えてください。 下記のようなデータがあるとします。   A    B    C   D 1 田中  東京  千葉  福岡 2 山田  京都  滋賀 3 佐藤  奈良  青森  USA 4 鈴木  カナダ 愛媛 A列は名前、B列以降は文字列です。B列以降はC列までの行、D列までの行とさまざまです。重複セルはありません。 これを下記のように並べ替えたいです。   A    B    C   D 1東京  田中 2千葉  田中 3福岡  田中 4京都  山田 5滋賀  山田 6奈良  佐藤 7青森  佐藤 8USA   佐藤 9カナダ 鈴木 10愛媛  鈴木 こういうことは可能でしょうか??? 教えてください。 よろしくお願いします。

  • Excelで各行の最小値となる列の探索

    Excelで,各行ごとに,最小値を探索し,その最小値が どの列のデータかを計算したいのですが,どのようにすればよいのでしょうか? 例えば      山田  鈴木  田中 データ(1) 10.3  0.42  0.5 データ(2) 1    10.1   4 データ(3) 5    11.8   2 といった感じのデータに対して,      山田  鈴木  田中 データ(1) 10.3  0.42  0.5  鈴木 データ(2) 1    10.1   4   山田 データ(3) 5    11.8   2   田中    という感じで,各列の1行目の値が出力されるように したいのですが。 一応,LookUp関数,Match&Index関数を使ってみましたが,探索する文字列が小数のためか,探索できる行と N/Aになるものとが存在し,その差がなぜ生じるのかが わかりません。 上記関数にはこだわらないので,何か良い方法がありましたらご教授ください。

  • 一部文字の置き換え(EXCEL)

    いつもお世話になります。 EXCEL2003を使用しています。 以下のような列データがあります。  A列 あ0001 い0002 う0003  ・  ・  ・ 以下のような置き換えを行いたいのですが、 あ→01 い→11 う→21 ・・・ のように、 先頭1文字を指定数字に置き換えて、  A列 010001 110002 210003 以上、ご教授のほどよろしくお願いします。