ここから質問投稿すると、最大4000ポイント当たる!!!! >>

は無いでしょうか。
クリップアートは使いづらく希望のものも無いので、図形でCGのような感じに描きたいのです。
キングソフトを普段は使ってますが、古いマイクロソフトのオフィスなら持ってます。

宜しくお願い致します。

A 回答 (1件)

マイクロソフトのWordでOKです。


図形を描いて右クリックから「頂点の編集」というメニューがあります。
下記のページには「ワード2010以降のワードでは 基本の図形でも頂点の編集ができるようになりました」との記載がありますが、それ以前でも可能だった???「基本図形以外」で可能だったのか?が、やや曖昧ですが、フリーフォームなら間違いなく可能です。
https://word2013.komamemo.com/cyouten.html
   
以下のサイトはWordだけで描いています。
http://www1.bbiq.jp/taku0055/
  
参考書
https://book.impress.co.jp/books/2684
    • good
    • 1
この回答へのお礼

腰を抜かしました。
私の持ってるのはワード2010でした。
誠に有難う御座いました。

お礼日時:2019/01/21 16:58

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aと関連する良く見られている質問

Qエクセルが壊れた

エクセルが不具合発生で使えなくなりました、
修復が出来るのと出来ないのと有り 再度開くとエラーに成り開けません。
PC購入時に付属で付いて来たオフイスCDを再インストール可能ですか、
再インストールする事でエクセル使用できますか。

Aベストアンサー

#1さんの回答通りだと思われます。
一応念のため。
https://did2memo.net/2019/01/04/excel-update-kb4461627/

Qエクセルについて、お救い下さい。

B1がC1が結合されている場合に、形が一致していません。とエラーになってしまいます。
結合を解除せずになんとか入力できないでしょうか?ご教示下さい。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Range("B1:B10")) Is Nothing Then Exit Sub
Cancel = True
If Target.Value = "□" Then
Target.Value = "■"
ElseIf Target.Value = "■" Then
Target.Value = "□"
End If
End Sub

Aベストアンサー

一番安易な方法ですが、Target.Value → Target(1).Value にすればエラーは回避できます。機能的にも問題は無いです。ただ、この後もコードを追加していくのであれば、やめておいた方が良いです。他の回答を待ちましょう!!

Qエクセルの表計算

エクセル初心者です。表で①の転送先に② 10Kを入力すると自動で②の転受けに① 10Kが表示されるような表を作りたいのですが、関数がわかりません。どんな関数で表示させたら良いのでしょうか?
場所は複数存在します。宜しくお願い致します。
場所    転送先    転受先    残数
① 100K ② 10K           90K
② 60K         ① 10K   70K

Aベストアンサー

こんにちは

番号と数値や単位をまとめて文字列化してしまっているので、およそ表計算らしくない構成になっていると思われます。
他にも計算等の処理をするおつもりなら、早々に構成を考え直した方がよさそうです。

さて、ご提示の表がA列~D列を使っていて、ご質問の転受先の列はC列との仮定でよいのなら、C2セルに、
=IFERROR(LEFT(INDEX(A:A,LARGE(IFERROR(IF(CODE(B$2:B$20)=CODE(A2),1,-1)*ROW(B$2:B$20),-1),1)),1)&MID(INDEX(B:B,LARGE(IFERROR(IF(CODE(B$2:B$20)=CODE(A2),1,-1)*ROW(B$2:B$20),-1),1)),2,100),"")
の式を入れて、Ctr+Shift+Enterで確定。(←必須です)
確定後、下方にフィルコピーします。

Qエクセル リストと完全一致するセルに色をつける

シート1のA列とB列に
aaa ccc
bbb ggg
ccc kkk
ddd ooo
と言うリストがあって、A1〜A4はAチーム、B1〜B4まではBチームと名前を付けています
シート2にAチームのリスト4個が続いているものがあればセルを赤、Bチームのリスト4個が続いているものがあればセルを黄色に塗りたいです
AチームとBチームの中には同じ品番がある時もあります
条件付き書式で設定は出来るでしょうか?

Aベストアンサー

(´・ω・`)
”○” の数を数えるんじゃないんだよなあ。

・・・本題・・・

条件付き書式ですよね。

シート2のリストの並び順は
 aaa
 ccc
 bbb
 ddd
では「Aチーム」と認識しないという事でよろしいでしょうか?
ならば、とても簡単です。

シート2の一覧において、

 判定するセル1
 判定するセル2
 判定するセル3
 色を付けるセル
 判定するセル4
 判定するセル5
 判定するセル6

という範囲について調べれば良いという事。

 判定するセル1
 判定するセル2
 判定するセル3
 色を付けるセル

 判定するセル2
 判定するセル3
 色を付けるセル
 判定するセル4

 判定するセル3
 色を付けるセル
 判定するセル4
 判定するセル5

 色を付けるセル
 判定するセル4
 判定するセル5
 判定するセル6

の4パターンについてそれぞれ調べれば良いだけ。

自分なら
 aaa-bbb-ccc-ddd
のようにシート1から文字列を作り、それが調べるセルで同じパターンになるかを調べます。
シート1はA5セルから、シート2はA11セルからデータが入力されているなら、

 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A11 & A12 & A13 & A14
 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A12 & A13 & A14 & A15
 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A13 & A14 & A15 & A16
 シート1!A5 & シート1!A6 & シート1!A7 & シート1!A8 = A14 & A15 & A16 & A17

という条件になる。
この4つのうちの一つでも条件を満たせばセルに赤色を付ければいい。
「Bチーム」についても同様にすればいいので、
この場合、8つの条件式を設定することになります。

面倒でもこの考え方ができていないと、ちょっと条件が変わっただけで対処できずに終わります。
冒頭で「並び順」について書きましたが、並び順がシート1のリストの通りでなくとも色を付けたい場合でも、この考え方は必要ということです。

・・・
ちなみに厄介なのが、どちらのチームにも「ccc」がいるというところかな。
これが無ければ違う方法でシンプルにできるんですけどねえ。

(´・ω・`)
”○” の数を数えるんじゃないんだよなあ。

・・・本題・・・

条件付き書式ですよね。

シート2のリストの並び順は
 aaa
 ccc
 bbb
 ddd
では「Aチーム」と認識しないという事でよろしいでしょうか?
ならば、とても簡単です。

シート2の一覧において、

 判定するセル1
 判定するセル2
 判定するセル3
 色を付けるセル
 判定するセル4
 判定するセル5
 判定するセル6

という範囲について調べれば良いという事。

 判定するセル1
 判定するセル2
 判定するセル3
 色を付け...続きを読む

Qエクセル 予定表から最初に行った日 できれば行った場所の自動抽出

エクセル 添付の予定表があります。


最初に行った日の抽出 
できれば行った場所も自動抽出

先生方のご教授をお願いいたします。

Aベストアンサー

こんにちは

予定表(03/03 18:08投稿)から、出力表(03/03 18:06投稿)を作成したいってことですよね?


予定表のシート名をSheet1と仮定し、出力表のレイアウトがご提示の通り20行目から始まり、(列方向が不明ですが)A列に地名、B20:D20に人名が入力されているものと仮定します。

B21セルに
=IFERROR(1/(1/MIN(IF(OFFSET(Sheet1!$A$1,MATCH(B$20,Sheet1!$A$1:$A$100,0)-1,1,3,100)=$A21,Sheet1!$B$1:$CW$1))),"")
の式を入力して、Ctr + Shift + Enterで確定します。(←必須です)

その上で、右、下方向にフィルコピーではいかがでしょうか。

Qセルをクリック⇒そのセルに入力された文字を○で囲む

以前、上記の問い合わせがあり下記の回答がありました。
確かに数字のセルには「〇」が付くのですが、結合したセルをダブルクリックすると
「実行時エラー’13’ 型が一致しません」となります。回避方法を教えて頂けないでしょうか。
―――>ここから
>『2』という数字の書かれたセルをダブルクリックすると、
>『2』という数字が○で囲まれるようにする事は出来ないものでしょうか?

単純にセルを塗りつぶすだけの方が簡単なのですが、
ご要望が「丸囲い文字」というコトですね。

ExcelではWordのような囲い文字の設定はないようですし、
丸囲い数字は環境依存文字になってしまいますので、
オートシェイプの丸をセル上に表示させる方法はどうでしょうか?
尚、セル内の数字の位置がバラバラだとずれてしまいますので、数字そのものも中央揃えにしています。
セルをダブルクリックすると、数値が入っているセルに関してだけ「丸囲い文字」もどきにしています。
(文字列セルは何も反応しません)
そして、すでに丸のオートシェイプがあるセルをダブルクリックすると
その丸は消えるようにしてみました。

画面左下の操作したいSheet見出し上で右クリック → コードの表示 → VBE画面のカーソルが点滅しているところに
↓のコードをコピー&ペースト → Excel画面に戻り、好みのセルをダブルクリックしてみてください。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'この行から
Dim c As Range, myShp As Shape, myFlg As Boolean
Set c = Target
If IsNumeric(c) And c <> "" Then
Cancel = True
c.HorizontalAlignment = xlCenter
For Each myShp In ActiveSheet.Shapes
If myShp.Top >= c.Top And myShp.Top + myShp.Height <= c.Top + c.Height And _
myShp.Left >= c.Left And myShp.Left + myShp.Width <= c.Left + c.Width Then
myFlg = True
Exit For
ElseIf myShp.Left > c.Left + c.Width And myShp.Top > c.Top + c.Height Then Exit For
End If
Next myShp
If myFlg = True Then
myShp.Delete
Else
With ActiveSheet.Shapes.AddShape(msoShapeOval, c.Left + (c.Width - c.Height) / 2, _
c.Top + c.Height / 40, c.Left + c.Height, c.Top + (c.Height / 20) * 19)
.Width = c.Height - c.Height / 20
.Height = c.Height - c.Height / 20
.Fill.Visible = msoFalse
With .Line
.ForeColor.RGB = vbBlack
.Weight = 0.7
End With
End With
End If
End If
End Sub 'この行まで

※ セル幅がセルの高さより広いという前提です。
※ すでにオートシェイプが表示されているセルでダブルクリックする際、
オートシェイプ上でダブルクリックしないようにしてください。

以前、上記の問い合わせがあり下記の回答がありました。
確かに数字のセルには「〇」が付くのですが、結合したセルをダブルクリックすると
「実行時エラー’13’ 型が一致しません」となります。回避方法を教えて頂けないでしょうか。
―――>ここから
>『2』という数字の書かれたセルをダブルクリックすると、
>『2』という数字が○で囲まれるようにする事は出来ないものでしょうか?

単純にセルを塗りつぶすだけの方が簡単なのですが、
ご要望が「丸囲い文字」というコトですね。

ExcelではWordの...続きを読む

Aベストアンサー

> If IsNumeric(c) And c <> "" Then
  ↓
If IsNumeric(c.Cells(1, 1)) And c.Cells(1, 1) <> "" Then

Qエクセル if関数の結果が合いません

エクセル初心者です。
if関数がうまくいきません。電気料金の計算です。

=ROUNDDOWN(IF($I$39&gt;=301,$F$66+120*$J$66+$N$66*180+($I$39-300)*$R$66,IF(120&lt;$I$39&lt;301,$F$66+120*$J$66+($I$39-120)*$N$66,$F$66+($I$39*$J$66))),0)

I39が120越え~300以下の値の場合、N66の数値(21.33)を掛けて出る結果のみ正しく出ません。

F66=1188
I39が
0~120以下の場合 J66(17.52)を掛ける
120越え~300以下の場合 N66(21.33)を掛ける
300越え R66(23.02)を掛ける

ex.I39が150の場合、120まではJ66(17.52)を掛け、121~150まではN66(21.33)を掛けたものを足し、1188(基本料金)を足します。

Aベストアンサー

条件を整理しよう。
I39セルの値で定数を変えたいという事ですね。
 0以上120以下
 120超過300以下
 300超過
と言う条件なら。
 I39<=120
 I39<=300
 それ以外
と3つの条件にできる。
上から順番に判断すれば「120超過」と「300超過」を条件に含める必要はない。
 =IF( I39<=120 , 式 , IF( I39<=300 , 式 ,式 )
簡単になる。

てことで、質問文の数式を比較してみよう。
=ROUNDDOWN(
  IF($I$39&gt;=301
    ,$F$66+120*$J$66+$N$66*180+($I$39-300)*$R$66
    ,IF(120&lt;$I$39&lt;301
      ,$F$66+120*$J$66+($I$39-120)*$N$66
      ,$F$66+($I$39*$J$66)
     )
   )
 ,0)

・・・
(´・ω・`)
全然違う…まあ、300超過から条件を並べているようだからね。
それにしても、どう見ても
    ,IF(120&lt;$I$39&lt;301
の部分がおかしい。
 120<I39<301
ではないかと推測するが、
こんな指定はできないんだ。
 120<I39
 I39<301
と2つに分ける必要がある。
そしてこれをAND関数でまとめる。
 AND(120<I39,I39<301)
こんな感じ。
たぶんこれで正しく判断されると思う。
(他は見ていないので、正しい結果が返るかは保証できません)

条件を整理しよう。
I39セルの値で定数を変えたいという事ですね。
 0以上120以下
 120超過300以下
 300超過
と言う条件なら。
 I39<=120
 I39<=300
 それ以外
と3つの条件にできる。
上から順番に判断すれば「120超過」と「300超過」を条件に含める必要はない。
 =IF( I39<=120 , 式 , IF( I39<=300 , 式 ,式 )
簡単になる。

てことで、質問文の数式を比較してみよう。
=ROUNDDOWN(
  IF($I$39&gt;=301
    ,$F$66+120*$J$66+$N$66*180+($I$39-300)*$R$66
    ,IF(120&lt;$I$39&lt;301
   ...続きを読む

Qエクセルのファイルを開く際の質問です

エクセルのファイルを開くと、常にAの160のセルが左上に表示させるような方法はありませんでしょうか、みんなが使うので、いつも開くと、最期のほうのページが表示されます。
VBAになるのかと思いますが、思いつきません。
先頭行の固定は必要なのですが、なんとか途中のページにある文章を左上にいつも表示させて開きたいのです。どなたか、お救い下さい。

よろしくお願いいたします。

Aベストアンサー

こんばんは。

'//Thisworkbook モジュールに貼り付けます。
Private Sub Workbook_Open()
  Application.Goto Worksheets(2).Range("A160"), True
End Sub

マクロ付きのブック(xlsm)か、バイナリのブック(xlsb) で保存します。

ただし、もし、拡張子が、xlsx でマクロなしのブックを指定した場合は、個人用マクロブックなどを使った特別のブログラムが必要になります。それはまた、ご相談ください。

QExcelで土、日、祝日の色分けがうまくいきません

Excelでシフト表を作成しています。列に日付を入力し、行に担当者を入力しています。担当者は1日当たり2セルを使用するため、日付は2セルを結合しています。この時「条件付き書式」を用い土、日、祝日の色分けをしようとしましたが、Weekday関数を使用していますが、関数のセル指定を1つ目のセルを指定しても「:」を使って2つ目のセルを指定しても担当者の1つ目のセルしか色がつきません。どうすればいいでしょうか。

Aベストアンサー

諦める。

Qエクセルの枠の複数選択

エクセルで給与明細を作成しており全員の合計を計算する計算式を作成するのに同一書式の同一の枠を選択します。人数が多いため1人ずつ同一箇所の枠を選択してオートSUMで合計を出していますが面倒なので1か所を選択すると同一書式の同じ場所が選択できるやり方はないでしょうか?ご存知の方がいらっしゃれば教えてください。よろしくお願いいたします。

例 B7を選択するとF7も選択できる

Aベストアンサー

セルの範囲に名前が付けられるのはご存知でしょうか?
例えば、全員分の出勤日数を選択した状態で、「出勤日数」という名前を付けておけば、以降、その名前「出勤日数」で選択することができます。
また、=SUM(出勤日数) みたいな書き方もできますよ。


人気Q&Aランキング