Excel vba如何製作流程圖,這樣做就對了

2020-12-12 江覓易見

Excel有很好的流程圖製作工具菜單，其製作方法也有很多，相對也比較簡單。

但是，如果不熟悉製作過程的情況下，還是有一定的難度的。

前言

通過代碼來簡化製作流程，就是說把製作方法都省去，直接把所有工作都集中到一個按鈕上面來。

這樣的製作就簡單了多了。

下面通過代碼來做一個簡單流程圖製作過程。

方法

打開界面，可以看到左側是已經製作完成的一個示例。

其方法就是在右側文本框內輸入結構標籤，單擊製作按鈕就自動添加進行了。

其實，這個功能還沒有完全符合製作整個完整過程。

比如，如何刪除，或插入一個標籤。

考慮到其編碼可能比較多，時間關係也就沒有做。

不過，做一個簡單過程還是可以完成的。

關鍵代碼

AddShape(msoShapeRectangle, 150, 80, 150, 30)'添加矩形框AddConnector(msoConnectorStraight, 100, 100, 150, 100)'添加菱形框AddConnector(msoConnectorStraight, 100, 100, 150, 100).ConnectorFormat'創建一個連接符

掌握上面三條代碼，就基本掌握了流程圖形裡面如何添加圖形的基本操作了，具體方法，文後有代碼可查看。

代碼

順序結構函數

Private Sub AddRectShape(m As Worksheet, FirstShape As Shape, Titels As String)Dim s As Shapes, SecondShape As Shape, ShapeConn As Object Dim sWidth As Integer, sHeight As Integer sWidth = 150 sHeight = 30 Set s = Me.Shapes Set SecondShape = s.AddShape(msoShapeRectangle,_ FirstShape.Left, sHeight + FirstShape.Top + FirstShape.Height, sWidth, sHeight) With SecondShape.TextFrame .HorizontalAlignment = xlVAlignCenter .VerticalAlignment = xlVAlignCenter With .Characters .Text = Titels With .Font .Size = 12 .Name = "微軟雅黑" End With End With End With Set ShapeConn = s.AddConnector(msoConnectorStraight, 100, 100, 150, 100).ConnectorFormat With ShapeConn .BeginConnect connectedshape:=FirstShape, connectionsite:=3 .EndConnect connectedshape:=SecondShape, connectionsite:=1 End WithEnd Sub

分支結構函數

Private Sub AddDiamondShape(m As Worksheet, FirstShape As Shape, Titels As String)Dim s As Shapes, SecondShape As Shape, ShapeConn As Object Dim sWidth As Integer, sHeight As Integer sWidth = 150 sHeight = 60 Set s = Me.Shapes Set SecondShape = s.AddShape(msoShapeDiamond,_ FirstShape.Left, FirstShape.Top + sHeight, sWidth, sHeight) With SecondShape.TextFrame .HorizontalAlignment = xlVAlignCenter .VerticalAlignment = xlVAlignCenter With .Characters .Text = Titels With .Font .Size = 12 .Name = "微軟雅黑" End With End With End With Set ShapeConn = s.AddConnector(msoConnectorStraight, 100, 100, 150, 100).ConnectorFormat With ShapeConn .BeginConnect connectedshape:=FirstShape, connectionsite:=3 .EndConnect connectedshape:=SecondShape, connectionsite:=1 End WithEnd Sub

如這篇文章對你有幫助

歡迎關注、收藏

相關焦點

  • excel VBA是什麼?VBA編程入門教程
    本篇將介紹excel vba是什麼？vba編程入門教程，有興趣的朋友可以了解一下！一、excel vba是什麼？VBA的英文全稱是Visual Basic for Applications，是一門標準的宏語言。VBA語言不能單獨運行，只能被office軟體（如：Word、Excel等）所調用。
  • vba編程,如何畫帶箭頭直線,教你這麼做馬上學會畫流程圖
    下面具體介紹一下，如何利用vba代碼進行設置線條的一些方法。vba代碼畫線用到一個對象：LineFormat下圖為LineFormat屬性：屬性看上去較多，但大多有一定的規則，使用起來還是比較容易理解的。
  • 用excel製作文件管理器,所有版本皆可使用
    Hello，大家好，之前跟大家分享了使用excel中的power query功能製作一個文件管理器，但是很多分析反應自己的excel版本不夠高，無法使用，今天就跟大家分享如何使用宏表函數製作文件管理器，他也是可以實現文件刷新的，這個的操作也不難，下面就讓我們來看下他是如何設置的一、什麼是宏表函數以及FILES函數
  • Excel vba 利用定義名稱實現用戶登錄功能
    文/江覓易見在vba 中實現用戶登錄，並對登錄用戶進行身份識別，然後對用戶進行分組管理，此類功能值得進一步思考。這裡介紹一種方法，利用Excel中的名稱管理來進行身份識別，起到用戶登錄次數以及增減用戶的功能。
  • 用EXCEL製作一個簡單的五子棋遊戲
    今天，我們教愛學習的小朋友用excel製作一款非常簡單的雙人五子棋遊戲。其中涉及到的知識有：excel基礎操作vba基礎知識首先看看最終效果圖：首先我們製作棋盤因為excel的行列單位不一致，我們就用眼睛來調整行和列的大小，讓單元格差不多為正方形即可。然後我們為棋盤附上看起來不是很刺眼的黃色做為底色。最終我們就獲得了一個正式的棋盤了。
  • 你會用Excel製作流程圖嗎?
    而是怎麼能快速做出上面的辭職流程圖。做流程圖，有不少專業的軟體可以完成（在office自帶的smartArt工具中也有流程圖），但不定能做出自已想要的效果。在Excel中製作則隨心所欲。Excel中做流程圖，估計大部分同學是這樣做的:插入文本框並輸入文字，然後用線連接。
  • WPS教程:excel新手入門VBA功能使用介紹
    Excel教學：今天和大家分享一下excel中vba的使用方法入門，相信很多使用該軟體的朋友們對此都很感興趣，下面就和大家來分享一下，希望可以幫助到大家。3.打開vb以後,我們要先建立一個模塊,如圖所示,在菜單欄上執行:插入--模塊,這樣就直接插入並打開了一個模塊。4.輸入如圖所示的代碼：5.保存文件，按下F5執行，找到我們編輯的這個宏,【計算銷售額】,然後點擊【運行】寫在末尾——總結一下WPS用起來還是十分簡單的，後面也會出更多的EXCEL系列教程和其他知識分享。
  • Excel vba 無邊框窗體,如何實現
    文/江覓易見Excel vba製作無邊框是一個特殊的需求，有些時候，在一些功能上需要運用到沒有標題欄的窗體，沒有最大化、最小化和關閉功能按鈕。這就需要做一個無邊框的窗體。下面介紹一下無邊框製作Form窗體的方法。運行效果如下（這不僅僅是一張圖片，而是背景是一張圖片的Form窗體）無題欄窗體是一種比較特殊的窗體，由於比較另類，一般用到程序開始展示過渡或者一些過程提示方面應用。
  • excel中2000行數據以行排序,你需要多長時間
    Hello，大家好，今天跟大家分享下我們如何使用錄製宏批量的按照行來對數據排序，這個之前發過視頻，但是很多粉絲表示沒看懂，今天就來詳細的介紹下這種方法一、宏是什麼宏本質上就是我們所說的vba代碼，錄製宏就是將我們的操作記錄下來，將其編譯為vba代碼，當我下次需要重複操作的時候只需要運行宏
  • 辦公軟體word製作一個名字對戰小遊戲
    上次和朋友們一起用excel開發了一款五子棋小遊戲。可能有朋友會問，這麼多遊戲引擎，為啥要用excel這樣的辦公軟體來製作遊戲？原因有兩個：方便：不用配置環境，不用額外安裝引擎。所用到的技術也很簡單：word基礎操作知識word vba基礎知識我們正式開始：第一步：編寫遊戲規則及需求
  • Excel VBA 不可一世的宏中,基本數據構成你知道多少
    在上一期我們說到VBA的基本組織結構，那麼我們今天就來說說組成這些VBA代碼的磚瓦是由哪幾部分構成的，也就是說vba的處理數據的磚瓦。常量這值在我們的以後編寫中，也需要用到，比如我們需要引用某一天的匯率或者稅率，這個時候我們可以這些寫代碼，如下圖：以上就是我們定義了三個常量，就是把數字賦值給到某一個字符串，這樣做的好處就是，我們在用的時候，可以多次引用這個字符串即可，當我們需要修改的時候，只需要修改一次即可，是不是感覺很方面？但是請千萬記住，不要少了const，這是在VBA中規定好的寫法。
  • 流程圖製作工具怎麼使用?工作流程圖的製作方法分享!
    流程圖製作工具怎麼使用？說到流程圖可能大家的觀點都不一樣，有的小夥伴認為使用office工具就可以完成，有的小夥伴說需要使用專業的流程圖製作工具比較好。俗話說「每個硬幣都有正反兩面」，有爭議就證明我們討論的這些話題是有意義的。
  • 簡單的流程圖模板有嗎?如何繪製婚禮流程圖?
    要籌備婚禮，首先就得做一個詳細的婚禮流程，可別小看了一場婚禮，這一來二去的，中間的流程步驟可是不少的！不知道你眼中的婚禮流程是如何製作出來的呢？還是傳統的WORD文檔，一個步驟一個步驟寫下來嗎？今天，小北要為大家分享一個不一樣的製作婚禮流程的方法，那就是用流程圖來表現，至於這個流程圖怎麼做，這就是小北接下來要介紹的重點了！打開迅捷畫圖在線網頁之後，會看到下面的這個界面，因為這個畫圖工具裡有流程圖的模板，也有思維導圖的模板，我們這裡需要的是婚禮流程圖，因此，就需要先將類型定位到流程圖。
  • 電腦畫流程圖軟體哪個好?迅捷畫圖5分鐘快速製作流程圖
    電腦畫流程圖軟體哪個好？不知大家在工作中要不要繪製流程圖，它通過一些符號來記錄工作事項，描述工作要點，能清晰展示在某項工作中某個步驟的位置和重要性，所以學會繪製一份明晰的流程圖會幫助我們提高工作效率。沒接觸過又想操作的夥伴，可看看下文我在迅捷畫圖上是怎麼做的。
  • 教程:excel表格如何製作?
    如今，excel表格可謂是很多人必備的生活工作技能，下邊就簡單的講解一下excel表格的製作作教程：首先就是我們可以點擊表格上方的字母和左邊的數字框來調整合適的單元格長寬。排列序號的時候手打也是比較麻煩的，這時可以先縱向填寫兩個數字，然後向下拉，這樣就可以快速填充之後的數字序列了。還有表格的複製，這個也是非常簡單的就是我們日常用的CTRL+V和CTRL+V。可以整體複製也可以部分複製，選擇靠滑鼠的圈選。查找數據可以使用右上角的查找功能框快速的查找需要的文字，查找主要靠的是關鍵字。
  • 你天天用的excel也可以用來畫畫,這個工具3分鐘搞定!
    最近小妞迷上了一位77歲日本老大爺，他從畫將近20年，讓我敬佩的是他畫畫的工具，居然是我們每天都在用的excel，這幾天小妞打算寫一篇老大爺的傳記給大家學習一下滴，記得隨時過來看看啦。今天就針對excel主題，告訴大家這個用excel就能畫畫的技能，這個說出都很有面兒有木有。
  • 如何使用PPT快速製作教學流程圖
    常見的思維導圖製作軟體有很多，例如MindManager、MindMaster、iMindMap、XMind。對於一線老師來說，學習新軟體是很頭疼的事情。在教學能力培訓過程中經常會遇到老師在Word裡面直接繪製思維導圖的現象，排版混亂，很難修改，其實，老師們常見的PPT就可以快速簡單的製作出思維導圖。
  • Excel實現信息管理系統之數據錄入界面設計步驟詳解
    01引言先和大家說說，為什麼要用Excel電子表格做自動化的信息數據管理系統？本身excel就是一款功能強大的數據信息管理和分析軟體，我們如果在它的基礎上在設計信息管理的功能感覺有點多此一舉。但是大家仔細想想，我們在excel錄入數據時，很多時候都是在單元格中直接輸入，亦或者使用excel記錄單錄入數據，然後再進行數據處理，這種方式對於大眾來講非常簡單快捷。但是如果我們處理的數據量大，錄入數據時有若干列，或者多人錄入時，這樣直接輸入真的會很便捷嗎？
  • 如何製作體溫登記excel表格?
    體溫登記excel表格製作在公司復工期間所以，接下來，我將和大家分享如何製作體溫登記表格。如何製作體溫登記表格？步驟如下：1.開excel，點擊選擇4個單元格，在「開始」一欄中點擊「合併並居中」。
  • 如何使用PPT快速製作教學流程圖(教師必備)
    在教學能力培訓過程中經常會遇到老師在Word裡面直接繪製思維導圖的現象，排版混亂，很難修改，其實，老師們常見的PPT就可以快速簡單的製作出思維導圖。比如說，教學流程圖（在教案中清晰反映教學過程）、知識框架圖（一節、一章或者一個模塊知識體系圖）、組織結構圖（班主任製作班委組成示意圖、學校或者部門製作組織關係圖）、概念關聯圖（父、子、兄不同層級概念的關聯）、板書設計圖（一般在電子教案中使用）等。