这个图怎么画？

zhanglei1371

可参考此贴：http://tieba.baidu.com/p/923724176,
本人一直未思索出来
另外，以前本人成功的将圆形开放路径，编辑顶点，现在无论如何也做不出来了，有没人知道如何 操作？

liuhoubin168

三圆重叠.rar (7.55 KB, 下载次数: 24)

2013-10-18 11:36 上传

点击文件名下载附件

看看效果如何？

xyz74sc

好像在2010中已经可以很方便地做这种图了。如果一定要2003做，也不麻烦，我做了个效果图：

xyz74sc

我的建议还是用2010来处理这种图

zhanglei1371

xyz74sc 发表于 2013-10-18 11:38
好像在2010中已经可以很方便地做这种图了。如果一定要2003做，也不麻烦，我做了个效果图：

2003怎么做，步骤呢，伙计，我要的就是步骤啊....或者，来个gif、

liuhoubin168

1\插入图示，选三圆图（维恩图）
2\取消自动版式
3\选择这三个圆，复制到其他位置，无填充，黑线条，组合。
4\使用曲线工具，点击那三个交叉的点，封闭。
5\放大
6\编辑顶点
7\在顶点位置鼠标右键，角部顶点
8\调整
9\在每个顶点中间再添加一个顶点，直接拉到圆上。
10\再调整。

zhanglei1371

liuhoubin168 发表于 2013-10-18 12:05
1\插入图示，选三圆图（维恩图）
2\取消自动版式
3\选择这三个圆，复制到其他位置，无填充，黑线条，组合 ...

谢谢刘兄。
解决！

江湖一小生

强大，厉害，学习啦

dongdonggege

我把这个过程分为9步，
1/插入第一个圆
2/线型0.75——1.25
3/插入第2个圆
4/设置图片格式——填充颜色——填充效果——图案——横竖第3个圆
5/选择两个圆
6/复制——编辑——原图形删除
7/选择性粘贴——图片(增强型图元文件
8/设置图片格式——裁剪图片——右边距3.36厘米
9/右键——旋转——组合

1. Sub test()
   
2.     Set odoc = ActiveDocument '
   
3.     Set shp = odoc.Shapes.AddShape(msoShapeOval, 200, 150, 50, 50) '1插入第一个圆
   
4.     With shp
   
5.         '.Fill.ForeColor.RGB = RGB(255, 0, 0) '
   
6.         .Fill.Visible = msoFalse '填充——无填充颜色
   
7.         .Line.Weight = 1.25 '2线型0.75--1.25
   
8.     End With
   
9.     Set shp2 = odoc.Shapes.AddShape(msoShapeOval, 220, 150, 50, 50) '3插入第2个圆
   
10.     With shp2
    
11.         '.Fill.ForeColor.RGB = RGB(255, 0, 0) '
    
12.         '.Line.Weight = 1.25 '
    
13.         .Fill.Patterned msoPatternDarkDownwardDiagonal
    
14.         '4设置图片格式 --填充颜色 - -填充效果 - -图案 - -横竖第3个圆
    
15.     End With
    
16.     odoc.Shapes.Range(Array(shp.Name, shp2.Name)).Select '5选择两个圆
    
17.     Selection.Copy '6复制--编辑
    
18.     Selection.Delete '原图形删除
    
19.     Selection.PasteAndFormat (wdPasteDefault) '7选择性粘贴--图片(增强型图元文件)
    
20.     'Selection.ShapeRange.PictureFormat.CropRight = 30 '8/设置图片格式——裁剪——右边距3.36厘米
    
21.     'Selection.ShapeRange.IncrementRotation 180# '9/右键——右旋转180——组合
    
22. End Sub

复制代码

图形裁剪，好像只有图片才有这个功能，所以第8步，第9步出现错误。
我一直是做PowerPoint的，对Word不熟，请各位多多指点，图形裁剪的代码，谢谢。

dongdonggege

直到今天，总算明白了。