vba编程

‘壹’ vba 编程

VBA：全名 Visual Basic for Application
VBA是Office系列软件的内置编程语言。VBA的语法与独立运行的Visual Basic编程语言非常相似，但两者并非完全一致，在许多语法和功能上有所不同。VBA从VB中获得了主要的语法结构，另外又加了Office的一些功能。

‘贰’ vba编程:

不用VBA一样做到
第1种方法、你要会ACCESS和简单的SQL语句的话，将这张表链接到ACCESS中，然后写SQL查询语句。
第2种方法、用EXCEL的数据透视功能，EXCEL03我用的很爽，07和10没试过，但觉得也不会差。

如果非要用VBA写，其实就是把你那张表做为数据库对待，做个SQL的读取，但最好还是将表链接到ACCESS中处理，必竟EXCEL只能称为数据表，不能称为数据库。

‘叁’ excel VBA编程

用下面代码

Private Sub Worksheet_Change(ByVal Target As Range)

Dim m As String

If Target.Row = 1 And Target.Column = 1 Then

m = Target.Value

With Sheets("Sheet2").Rows(m).Borders(xlEdgeLeft)

.LineStyle = xlContinuous

.ColorIndex = xlAutomatic

.TintAndShade = 0

.Weight = xlThin

End With

With Sheets("Sheet2").Rows(m).Borders(xlEdgeTop)

.LineStyle = xlContinuous

.ColorIndex = xlAutomatic

.TintAndShade = 0

.Weight = xlThin

End With

With Sheets("Sheet2").Rows(m).Borders(xlEdgeBottom)

.LineStyle = xlContinuous

.ColorIndex = xlAutomatic

.TintAndShade = 0

.Weight = xlThin

End With

With Sheets("Sheet2").Rows(m).Borders(xlEdgeRight)

.LineStyle = xlContinuous

.ColorIndex = xlAutomatic

.TintAndShade = 0

.Weight = xlThin

End With

End If

End Sub

代码放在

Excel怎样快速多表查找数据列表

‘肆’ VBA编程语言的定义

你的问题不全面，无法回复。
VBA很简单，就是对于excel表格的编程操作。VBA相当于VB的简化版本，提供了服务于excel 的类库，因此对于excel编程事倍功半。
学习起来也非常容易，由于excel对于表、指令、表格定位很死板，因此VBA相对其他语言来说很好上手。
如果你有一点编程基础的话，只需要学习如何对于excel表格过滤，excel表格的复制粘贴代码等等简单操作，基本就可以编写出小的程序。
Excel自带的编程就是VBA编辑器，无需下载，还提供报错，很好用的。
但是现在主流不是VBA，而是C#，如果你打算走编程的话，最好走C路线，VB基本属于边缘。

‘伍’ vba编程,

是Excel还是Word?
输出的是什么样的格式？
不同的环境有不同的写法，没提供环境就只能给你通用的了，而且用随机数

Tmp=""
Sub Show()
For I=1 to 6
For J=1 to 5
tmp=tmp & int(rnd*100)
Next J
tmp=tmp & vbcrlf
Next I
msgbox tmp
End Sub

‘陆’ 用vba编程

说个思路
多重循环打印
就可以了

‘柒’ Excel VBA编程

Sub学生成绩转换()
DimscoreAsInteger,levelAsString
score=Val(InputBox("输入学生的成绩：","学生成绩转换"))
Ifscore<0orscore>100Then'这里不能用and，一个数不可能既<0同时又>100
MsgBox"输入有误，请输入0~100的数",vbOKOnly,"学生成绩转换"
Else

Ifscore>=85Then

level="A"

ElseIfscore>=75Then

level="B"

ElseIfscore>=65Then

level="C"

ElseIfscore>=60Then

level="D"

Else

level="F"

EndIf

MsgBox"学生成绩等级为："&level,vbOKOnly,"学生成绩转换"

EndIf

EndSub

‘捌’ vba编程教程是什么

vba编程入门教程：

1、打开vba编辑器

打开vba编辑器有下边三种方法供大家使用：

方法1：点击excel菜单中的【开发工具】，然后在代码选项卡中点击【Visual Basic】 即可，如下图所示：

VBA的英文全称是Visual Basic for Applications，是一门标准的宏语言。VBA语言不能单独运行，只能被office软件（如：Word、Excel等）所调用。

VBA是一种面向对象的解释性语言，通常使用来实现Excel中没有提供的功能、编写自定义函数、实现自动化功能等。

‘玖’ 利用VBA编写程序

按钮的事件里面写一个语句就可以了吧：

IfEdit1.Text="春"then
Edit1.Text="夏"
ElseIfEdit1.Text="夏"then
Edit1.Text="秋"
ElseIfEdit1.Text="秋"then
Edit1.Text="冬"
ElseIfEdit1.Text="冬"then
Edit1.Text="春"
Endif

‘拾’ EXCEL VBA编程

sheetz =Mid(ActiveSheet.Name, 2, Len(ActiveSheet.Name) - 2)
取两个引号之间的部分不就行了